Fehler unter Office97, kein Fehler unter 2000
02.06.2004 09:42:34
Daniel
Dim i As Long, lz As Long
lz = Range("L65536").End(xlUp).Row
For i = 1 To lz
If Cells(i, 2).Value = 0 Then
Rows(i).ClearContents
End If
Next i
Vielen Dank im Voraus für Eure Hilfe.
Daniel
Anzeige