Laufzeitfehler Zeile löschen
26.08.2022 12:07:28
Lion
folgendes Problem habe ich.
Ich habe eine Tabelle, welche diverse Drop Down Felder besitzt.
Wenn in Spalte B*** "NO" ausgewählt wird soll die komplette Zeile gelöscht werden.
Wenn in Spalte P*** "exists" ausgewählt wird soll die komplette Zeile gelöscht werden.
Das ist mein code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B1:B400,P1:P400")) Is Nothing Then Exit Sub
If Target.Value = "NO" Or Target.Value = "exists" Then Rows(Target.Row).Delete = True
End Sub
Kann mir bitte wer sagen, wie ich den Laufzeitfehler behebe oder einfach deaktivieren kann?
Vielen Dank im voraus.