StopMacro-Makroaktion
Gilt für: Access 2013, Office 2013
Sie können die StopMacro-Aktion verwenden, um das aktuell ausgeführte Makro zu beenden.
Einstellung
Die StopMacro-Aktion weist keine Argumente auf.
Hinweise
In der Regel verwenden Sie diese Aktion, wenn eine Bedingung das Beenden des Makros erforderlich macht. Sie können einen bedingten Ausdruck in der Aktionszeile des Makros verwenden, die diese Aktion enthält. Wenn der Ausdruck als True (–1) ausgewertet wird, beendet Microsoft Access das Makro.
Sie können z. B. ein Makro erstellen, das ein Formular öffnet, das die Täglichen Bestellsummen für das datum anzeigt, das in einem benutzerdefinierten Dialogfeld eingegeben wurde. Sie können einen bedingten Ausdruck verwenden, um sicherzustellen, dass das Bestelldatum-Steuerelement im Dialogfeld ein gültiges Datum enthält. Andernfalls kann die MessageBox-Aktion eine Fehlermeldung anzeigen, und die StopMacro-Aktion kann das Makro beenden.
Wenn das Makro die Echo - oder SetWarnings-Aktionen verwendet hat, um Echo oder die Anzeige von Systemmeldungen zu deaktivieren, wird diese durch die StopMacro-Aktion automatisch wieder aktiviert.
Diese Aktion ist in einem VBA-Modul (Visual Basic für Applikationen) nicht verfügbar.
Beispiel
The following macro demonstrates the use of the OnError action. In this example, the OnError action specifies that Access run a custom error handling macro named ErrorHandler when an error occurs. Wenn ein Fehler auftritt, wird das Untermakro CatchErrors aufgerufen. Wenn die Fehlernummer 2102 ist, wird eine bestimmte Meldung angezeigt, und die Makroausführung wird angehalten. Andernfalls wird eine Meldung angezeigt, die den Fehler beschreibt, und das Makro wird angehalten, sodass Sie eine zusätzliche Problembehandlung durchführen können. The ErrorHandler macro displays a message box that refers to the MacroError object to display information about the error.
Der Beispielcode stammt von:Microsoft Access 2010 Programmer's Reference.
/* MACRO: mcrThrowErrors */
/* PURPOSE: Error handling using macros in Access 2010 */
OnError
Go to Macro Name
Macro Name CatchErrors
OpenForm
Form Name frmSamples
View Form
Filter Name
Where Condition
Data Mode
Window Mode Normal
MessageBox
Message This message appears after the OpenForm action
Beep Yes
Type None
Title
/* SUBMACRO: CatchErrors */
SubMacro: CatchErrors
If [MacroError].[Number]=2101 Then
MessageBox
Message Cannot find the specified form!
Beep Yes
Type Critical
Title
StopMacro
Else
MessageBox
Message =[MacroErro].[Description]
Beep Yes
Type None
Title Unhandled Error
SingleStep
End If
End SubMacro