Zeilen löschen
22.11.2002 13:02:41
Frank
ich habe folgendes Problem. Ich möchte aus einer Liste mehrere Zeilen löschen wo die Spalte H leer ist. Wenn nun mehrere aufeinanderfolgende Zeilen leer sind, wird aber nur jede zweite Zeile gelöscht. Ich verwende folgendes VBA
Dim irowl As Integer, irow As Integer
Range("A1").Select
Application.ScreenUpdating = False
For irow = 9 To 428
If IsEmpty(Cells(irow, 8)) Then
Rows(irow).Delete
Gruß Frank
Anzeige