Sub Firma1()
Dim iRow As Long
Dim Zähler As Integer
Zähler = 2
For iRow = 2 To 2500 Step 8
Cells(iRow, 4).FormulaLocal = "=sverweis(Tabelle2!C" & Zähler & ";Tabelle4!$B$1:$G$15;3;Falsch)) _
Zähler = Zähler + 8
Next
End Sub
Kann mir jemand verraten wo der Fehler hier liegt? Danke!!!!!!!!