Zeile löschen VBA Code
06.03.2023 14:45:33
Gabriele
der liebe Gerd (DANKE :-)) hat mir schon folgenden Code erstellt:
Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Column = 5 Then
If .CountLarge = 1 Then
If .Value = "x" Then
Application.EnableEvents = False
.EntireRow.Copy .EntireRow(2)
.EntireRow(2).ClearContents
Application.EnableEvents = True
End If
End If
End If
End With
End Sub
Das klappt super. Ich gebe in Spalte E ein "x" ein und darunter wird eine neue Zeile mit denselben Werten erstellt.
Kann mir jemand den Code so umschreiben, dass wenn das x wieder entfernt wird, die Zeile die sich darunter erstellt hat auch wieder gelöscht wird? Quasi den ganzen Befehl wieder retour?
Lieben Dank für die Hilfe
Gabriele