In meiner Tabelle wird per Makro ein bestimmter Bereich ausgewählt (z.B.die Zeilen 33:39). Dieser Bereich ist variabel. Nun möchte ich alle leeren Zeilen aus dem markierten Bereich löschen. Geht so etwas?
Gruss Klaus
Sub leere_weg()
Dim startRow As Long, endRow As Long, lRow As Long
With Selection
startRow = .Row
endRow = .Row + .Rows.Count - 1
End With
For lRow = endRow To startRow Step -1
If WorksheetFunction.CountA(Rows(lRow)) = 0 Then
Rows(lRow).Delete
End If
Next lRow
End Sub