Hallo,
ich möchte die Zelle B2 bis Zelle B(XYZ) auto ausfüllen.
XYZ habe ich mit einem Makro ermittelt.
Jetzt habe ich das Problem das ich XYZ nicht durch die ermittelten Zahl ersetzen kann.
Makro:
Rem Letzte belegte Zelle feststellen
Dim Letzte_Vlinie As Long
If Worksheets("Rohdaten").[B65536] = "" Then
Letzte_Vlinie = Worksheets("Rohdaten").[B65536].End(xlUp).Row
Else
Letzte_Vlinie = 65536
End If
Range("F1").Value = Letzte_Vlinie
Rem Test
Range("C2").Select
Selection.AutoFill Destination:=Range("C2:C40"), Type:=xlFillDefault
Rem Range("C2:C40").Select
C40 soll durch F1 oder Letzte_Vlinie ersetzt werden.
Hat jemand eine Lösung?
Gruß und danke
Frank