Hallo Zusammen,
ich möchte gerne in einer Tabelle, die in Spalte A,B und C gefüllt ist, die Spalte D (ab der 2. Zeile) mit einer Formel auffüllen. Bis zur letzten gefüllten Zeile.
Leider funktioniert es nicht....
[i]
letztezeile = Cells(Rows.Count, 3).End(xlUp).Row
ActiveCell.FormulaR1C1 = "=RC[-2]*1500"
Range("D2").Select
Selection.AutoFill
Destination:=Range("D2:'letztezeile'"), Type:=xlFillDefault
Range("D2:'letztezeile'").Select[/i]
Kann mir jemand helfen?
|