Zeilen löschen
10.07.2002 15:03:37
Peter S
Ich möchte aus einem Tabellenblatt regelmäßig die ersten 50 Zeilen löschen. Dazu lass ich folgenden Code ausführen
Private Sub löschen()
i = 3
For i = 3 To 50
If Worksheets("Über80").Range("A3").Text > "" Then
Rows(3).Delete
End If
Next i
End Sub
Wenn ich das im VBA-Editor teste funktioniert es. Starte ich jedoch über einen CommandButton1 (in Zelle A2 installiert)kommt die Fehlermeldung:
"Die Delete-Methode des Range-Objektes ist fehlerhaft"
Woran liegts ???
Anzeige