For-Next Schleife funkt. nicht
22.01.2004 15:10:18
ewald
in Abhängigkeit der Spalte A ab A2 nach unten variabel,
soll in der Spalte C ab C2 mit Nullen ausgefüllt werden.
Die Schleife funktioniert nicht Spalte C wirt
nicht ausgefüllt. Was ist falsch?
Sub klapp_nicht()
Dim Startzeile%, Endzeile&, Zähler&
Application.ScreenUpdating = False
Startzeile = 2
Endzeile = Cells(2, 1).End(xlDown).Row
For Zähler = Startzeile To Endzeile
Cells(Zähler, 3) = "0"
Next Zähler
Application.ScreenUpdating = True
End Sub
Kann mir jemand helfen?
Vielen Dank im Voraus.
Grüße
Anzeige