StopMacro, action de macro

S’applique à : Access 2013, Office 2013

Vous pouvez utiliser l’action ArrêterMacro pour arrêter la macro en cours d’exécution.

Setting

L’action StopMacro n’a pas d’arguments.

Remarques

Vous utilisez généralement cette action lorsqu’une condition rend nécessaire l’arrêt de la macro. Vous pouvez utiliser une expression conditionnelle dans la ligne d'action de la macro contenant cette action. Lorsque l’expression prend la valeur True (–1), Microsoft Access arrête la macro.

Par exemple, vous pouvez créer une macro qui ouvre un formulaire affichant les totaux des commandes quotidiennes pour la date entrée dans une boîte de dialogue personnalisée. Vous pouvez utiliser une expression conditionnelle pour vous assurer que le contrôle Date de commande dans la boîte de dialogue contient une date valide. Si ce n’est pas le cas, l’action MessageBox peut afficher un message d’erreur et l’action StopMacro peut arrêter la macro.

Si la macro a utilisé les actions Echo ou SetWarnings pour désactiver l’écho ou l’affichage des messages système, l’action ArrêterMacro les réactive automatiquement.

Cette action n'est pas disponible dans les modules Visual Basic pour Applications (VBA).

Exemple

La macro suivante illustre l'utilisation de l'action SurErreur. Dans cet exemple, l'action SurErreur spécifie qu'Access exécute une macro de gestion des erreurs personnalisée nommée GestionnaireErreur lorsqu'une erreur se produit. Lorsqu’une erreur se produit, la sous-macro CatchErrors est appelée. Si le numéro d’erreur est 2102, un message spécifique s’affiche et l’exécution de la macro est interrompue. Dans le cas contraire, un message décrivant l’erreur s’affiche et la macro est suspendue afin que vous puissiez effectuer un dépannage supplémentaire. Cette macro affiche une zone de message qui fait référence à l'objet MacroError pour afficher des informations sur l'erreur.

Exemple de code fourni parMicrosoft 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