If Rückgängig Then...
Jörg-HH
es sollen von einer Tabelle Änderungen erkannt werden. Dazu lasse ich einfach eine Eins in eine Zelle schreiben, in der ansonsten eine Null steht:
Private Sub Worksheet_Change(ByVal Target As Range)
If Tabelle103.Range("A1").Value = 0 Then Tabelle103.Range("A1").Value = 1
End Sub
Nun ist die Frage, was passiert, wenn der User seine Eingabe(n) bis zur ersten Aktion wieder rückgängig macht. Dann sollte die Eins wieder zu einer Null werden. Gut... rückgängig heißt Undo, aber ansonsten schweigt sich die Hilfe aus, und der Recorder hilft auch nicht weiter.Der kleine Codeabschnitt da oben müßte also etwa so weitergehen:
If Irgendwas komplett wieder Undo gemacht wurde, Then Tabelle103.Range("A1").Value = 0
Wie muß das denn auf VBAisch heißen...?
Grüße - Jörg