Ich möchte mittels VBA in der Spalte H ab H2 nach allen 7 Stellen eine Formel eintragen lassen.
Also H8,H15,H22 usw.
wie würde hier bitte der VBA Code lauten?
Danke
Josef
Public Sub Formel_einfuegen()
Dim lZeile As Long
For lZeile = 2 To 2000 Step 7
Range("H" & lZeile).FormulaLocal = "=A1+B1"
Next lZeile
Die Formel natürlich anpassen!!
Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Sub FormelEintragen()
Dim i%
For i = 2 To 100 Step 7
Cells(i, 8).FormulaR1C1 = "=RC[-7]*10"
Next i
End Sub