ich möchte in Tabelle2 alle leeren Zeilen löschen (bin auf Tabelle1) und diese erst "nach" dem löschen anzeigen. In dem unten angezeigten Makro löscht er mir alle leeren Zeilen von dem aktiven Blatt.
Wer kann mir helfen?
.
.
zl = Sheets("Tabelle2").UsedRange.Rows.Count
ActiveSheet.Range("A2").Select
For l = 1 To zl
If Len(ActiveCell.Value) = 0 _
Then Selection.EntireRow.Delete _
Else: ActiveCell.Offset(1, 0).Select
Next l
Worksheets("Tabelle2").Select
.
.
Dank und Gruß
Axel