ich hab da mal ne Frage.
Ich habe in Spalte A Daten deren Zeilenende unterschiedlich ist.
Wie kann ich per VBA die Formeln in Celle C2,D2;E2 kopieren, so dass diese
bis zum Ende in Spalte A reichen ?
Gruß
Stefan
Sub FormelnKopieren()
Dim zeilen As Integer
zeilen = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
Range("C2:E2").AutoFill Destination:=Range(Cells(2, 3), Cells(zeilen, 5)), Type:=xlFillDefault
End Sub
Gruß Christoph