Wieso wird Zeile nicht gelöscht?
13.08.2021 10:51:53
Basti
ich habe hier einen Code-Schnipsel.
Falls die entsprechende Zelle Leer ist, erscheint eine MSG-Box mit der Frage ob der Eintrag gelsöcht werden soll. Wählt man "Ja" aus, soll die Funktion in den Master gehen, das Tabellenblatt1 aufrufen und die entsprechende Zeile von B-J löschen.
Das tut sie aber nicht, wieso? Bis zur MSG-Box geht es noch, man klickt auf "Ja" aber gelöscht wird nichts...
If IsEmpty(BearbeiteteListe.Cells(j, 10)) Then
antwort = MsgBox("Die Zelle XY ist Leer, soll der gesamte Eintrag gelöscht werden?", vbYesNo + vbQuestion + vbDefaultButton2, "Löschen")
If antwort = vbYes Then
Master.Activate
MasterTabelle1.Select
MasterTabelle1.Range("B" & j & ":J" & j).Select
Selection.Delete Shift:=xlUp
End If
über jegliche Vorschläge bin ich dankbar.
Viele Grüße
Basti