アクションクエリを実行する

Access VBAでアクションクエリ(追加クエリや更新クエリ等)
を実行するには選択クエリと同様にDoCmd.OpenQueryメソッド
にて行います。

第1引数にはクエリ名を指定します。

Sub アクションクエリを実行()
    '追加クエリを実行する
    DoCmd.OpenQuery "クエリAdd"
End Sub

DoCmd.OpenQueryの第1引数のクエリがアクションクエリの場合、
実行時、処理を続行してよいかの確認をするメッセージが
表示されます。

例えば追加クエリの場合、
「追加クエリを実行すると、テーブルのデータが変更されます。」
というメッセージが表示されます。

「はい」ボタンを押下すると、処理が実行されます。