wie kann ich in VBA automatisiert für Worksheet 1 bis 4 und 6 bis 12 immer von A2 bis A50 die Formel die ich in A2 stehen hab nach unten ziehen oder vervollständigen (kopieren)!!
Gruß
Sub C ()
Dim i as Long
For i = 1 to 4
Sheets(i).Range("A2").Copy Sheets(i).Range("A3:A50")
Next i
For i = 6 to 12
Sheets(i).Range("A2").Copy Sheets(i).Range("A3:A50")
Next
End Sub
wenn die Formel in jedem Tabellenreiter in A2 steht