Zahlplan erstellen

[prymano]

Wie geht das, wenn in Spalte a leer, Zeile löschen
Irgendwann kapiere ich es auch

[Rabe]

Hi,

Wie geht das, wenn in Spalte a leer, Zeile löschen

so, wie wenn Du es in Gedanken machst:

Code:

Option Explicit

Sub löschen_leere()
  Dim i As Long
 
  For i = 1000 To 1 Step -1
     If Range("A" & i) = "" Then
        Rows(i).Delete
     End If
  Next i
End Sub