Hallo,
Ich habe im Moment diesen Code, möchte aber nicht dass es ganze Zeilen löscht.
Dim i As Double
For i = 260 To 2 Step -1
If Cells(i, 2).Value = "" Then _
Cells(i, 2).EntireRow.Delete
Next i
Ich hätte gerne dass wenn Cells(i, 2).Value = "" dann shift XLup so eine Zeile
im Range von Column A bis AN

Ist so etwas möglich?
Freundlichen Grüssen
Robert