Gruppe
Allgemein
Problem
Wie kann ich alle leeren Zeilen im benutzten Bereich eines Tabellenblattes löschen?
StandardModule: basMain
Sub CellsDelete()
ActiveSheet.UsedRange.SpecialCells( _
xlCellTypeBlanks).Select
Selection.Delete Shift:=xlUp
End Sub