次の方法で共有


Submacro マクロ ステートメント

適用先: Access 2013、Office 2013

Submacro ステートメントは、マクロ Designer ウィンドウで個別のマクロを定義します。

設定

Submacro アクションの引数は次のとおりです。

引数

必須

説明

名前

はい

マクロの名前として表示する文字列。

次のマクロは、 OnError アクションの使用を示しています。 この例では、 OnError アクションは、エラーが発生したときに ErrorHandler という名前のカスタム エラー処理マクロを実行することを指定します。 エラーが発生すると、CatchErrors サブマクロが呼び出されます。 エラー番号が 2102 の場合、特定のメッセージが表示され、マクロの実行が停止します。 それ以外の場合は、エラーを説明するメッセージが表示され、追加のトラブルシューティングを実行できるようにマクロが一時停止されます。 ErrorHandler マクロは、エラーに関する情報を表示する MacroError オブジェクトを参照するメッセージ ボックスを表示します。

サンプル コードの提供元: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