Access: Änderungen in Formularen per Schaltfläche verwerfen

Nach Änderungen in Formularen geht Access einen vor allem für weniger erfahrene Anwender recht eigenwilligen Weg: Beim Wechsel des Datensatzes werden Änderungen ohne Rückfrage automatisch gespeichert, eine augenfällige Möglichkeit, begonnene Änderungen abzubrechen, gibt es anscheinend nicht.

von Burkhard Strack

Zwar lassen sich Änderungen im Formular über die Esc-Taste oder mehrmaligen Aufruf von BEARBEITEN-RÜCKGÄNGIG zurücknehmen, Anwender mit wenig Erfahrung werden diese Funktionen kaum nutzen können. Sinnvoller wäre hier eine auffällige ABBRECHEN-Schaltfläche, die dem Anwender als "Notausstieg" dient, alle Änderungen zurücknimmt und das Formular schließt:

" ein, und klicken Sie auf die Schaltfläche mit den drei Punkten, um den VBA-Editor zu öffnen.

Geben Sie im VBA-Editor folgende Anweisungen ein:
Private Sub btnAbbrechen_Click()
On Error Resume Next
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdUndo
DoCmd.SetWarnings True
DoCmd.Close acForm, Me.Name, acSavePrompt
End Sub

Schließen Sie den VBA-Editor, und lassen Sie das Formular einmal anzeigen, um die Schaltfläche zu testen. Ändern Sie beliebige Feldinhalte, und klicken Sie dann auf ABBRECHEN. Wenn Sie das Formular anschließend noch einmal öffnen und den betreffenden Datensatz prüfen, sehen Sie, dass die Änderungen wie erwartet verworfen wurden.

Versionen: Access 97, 2000 und 2002

Ähnliche Beiträge: