Office: (Office 365) VBA: Kein "Undo" mehr möglich?

Hallo,

ich habe meine Bestell-Tabelle so abgeändert, dass einiges per Makro, bzw. mittels Buttons übertragen wird.
Also zum Beispiel wird mit einem Klick auf den Button die Lieferadresse gleich der Rechnungsadresse gesetzt, oder es wird ein Preis ausgerechnet und eingetragen usw.
Das ganze hat (für mich) den Vorteil, dass die Zellen selber keine Formeln haben, die man versehentlich überschreiben kann, bzw. kann die Werte am Ende noch nacharbeiten, was sehr praktisch ist.

Wie dem auch sei. Mir ist jetzt aber auch aufgefallen, dass man diese Aktionen nicht via "Undo" rückgängig machen kann. Wenn jetzt also z.B. jemand versehentlich auf den Button klickt, der die Lieferadresse überschreibt, ist das natürlich doof, wenn man das nicht rückgängig machen kann.
Aber für mich im Geiste ist das ja eigentlich auch nur eine Eintragung, deswegen verstehe ich nicht, warum man das nicht rückgängig machen kann.

Alternativ müsste ich bei jedem Button erst ein "Willst du das wirklich?" Fenster vorschalten, aber das möchte ich nun wirklich nicht.

Aber die Kernfrage ist erstmal, ob Eintragungen mit Range("xx").Value nicht "rückgängig" gemacht werden können?

Vielen Dank

Andreas

 

Moin!
Aktionen mittels VBA löschen den Undo-Speicher.
Dies seit jeher so …
Es gibt zwar Application.Undo [klick], aber das hilft hier auch nicht.

Gruß Ralf

 

Moin,

ergänzend zu Ralf's Erklärung:
Du könntest Dir aber eine interne Undo-Funktion programmieren, indem Du Dir für die betreffenden Zellen (Intersect) eine öffentliche Variable nutzt, die sich immer den letzten Wert vor der Änderung (im Selection_Change Ereignis) merkt und den über einen Rückgängig Button zurückschreiben kann.