Microsoft Access Club >RunCommand 解説 >このページ >次項 < 前項  サイト内検索


acCmdRunOpenMacro : Access RunCommand



この定数を用いると、開いているマクロを実行する ことができます。但し、用途が限られているため利用範囲は狭いです。つまり、マクロをデザインビューで開いてる状態でなければエラーが発生します。

 

'Functionプロシージャは、VBE画面の標準モジュール欄に記述してください。

Function RunCommandMenu()

    On Error GoTo エラー
    
    DoCmd.RunCommand acCmdRunOpenMacro
    
    Exit Function
    
エラー:
    'エラーを分岐。
    If Err.Number = 2046 Then
        MsgBox Err.Description
    ElseIf Err.Number = 2501 Then
        MsgBox Err.Description
    Else
        MsgBox "予期せぬエラーが発生しました。: " & Err.Number
    End If
    
    End
End Function
 
  • 下記のようにマクロをデザインビューで開きます。サンプルでは、ポップアップメニューのマクロにFunctionプロシージャ RunCommandMenu() を割り当てています。

 

デザインビューでマクロを開いた図

 

  • ポップアップメニューの「開いているマクロの実行」をクリックすると、下記のようにメッセージが立ち上がります。

 

メッセージボックス図

 

2003/12/18

acCmdRunOpenMacro : Access RunCommand


 

-Microsoft Access Club-

アメリカ合衆国やヨーロッパのデータセンターからcPanelレンタルサーバーをご提供します。お支払いは日本国内の銀行振込で...。1ヵ月契約からOKです。
アメリカ合衆国やヨーロッパからcPanelレンタルサーバー。
お支払いは日本国内の銀行振込。
最短契約期間は1ヵ月契約からOKです。