Zeile löschen
19.02.2023 04:46:11
Max
ich verzweifel an der Funktion eine ganze Zeile per Makro zu löschen.
Es soll jede Zeile gelöscht werden, in welcher sich ein "x" in Spalte "A" befindet.
Leider löscht mein Makro immer nur den entsprechenden Eintrag in Spalte "A" und nicht die gesamte Zeile.
Über eine Hilfestellung würde ich mich sehr freuen.
Diesen Code habe ich verwendet:
Sub Zeile_Loeschen()
Dim Zelle As Range
For Each Zelle In Range("A1:A40")
If Zelle.Value = "x" Then
Zelle.EntireRow.delete
End If
Next Zelle
End Sub
Besten Dank
Grüße
Max