Extreme Veteran
Beiträge: 566
| Hallo,
Neuling - 09.06.20 17:08
[...]Ganz bewusst speichere ich die geänderten Daten nur, wenn auf einen Speicher-Button gedrückt wird.
[...]Neu möchte ich aber einbauen, dass bei Änderungen im Formular, eine Warnung kommt, wenn auf den «Weiter-Button» gedrückt wird.
In der Ereignisprozedur für den Speicher-Button kannst du folgende Zeilen einfügen:
If MsgBox("Soll gespeichert werden?", vbOkCancel + vbDefaultButton2, "Speichern") = vbOk Then
'hier der Code fürs Speichern
End If
DefaultButton2 bewirkt, dass Cancel den Fokus hat, d.h. wenn der Benutzer einfach mit Enter weitermacht, wird nicht gespeichert. Soll bei Enter gespeichert werden, muss entweder vbDefaultButton1 rein, oder lass die Konstante einfach weg.
----- Gruss - Peter |