Ich möchte wenn Zelle A9 nicht leer das der Inhalt aus Zelle A10 entfernt wird. Also immer die Zelle mit einem Inhalt dann soll bei der darauffolgenden Zelle der Inhalt gelöscht werden.
Danke mfG André
Sub löschen()
For i = 1 To 200 'Anzahl Deiner zellen in Spalte A
If Cells(i, 1) = "" Then
Cells(i + 1, 1) = ""
i = i + 1
End If
Next i
End Sub