クエリを実行する OpenQueryメソッド ： Access

VBAでクエリを実行するには、Docmd.OpenQuery を使用します。

構文：　DoCmd.OpenQuery QueryName, View, DataMode

Viewの引数　
acViewDesign：　デザインビュー
acViewNormal (既定値)：　テーブルビュー
acViewPivotChart：　ピボットグラフビュー
acViewPivotTable：　ピボットテーブルビュー
acViewPreview：　印刷プレビュー

DataModeの引数
acAdd：　追加
acEdit (既定値)：　編集
acReadOnly：　読み取り専用

■作成済みのAccessクエリ


■実行Accessフォーム

■実行結果　2つのAccessクエリーが開きました。

■ Access VBA 実行コード

Option Compare Database
Option Explicit

Private Sub コマンド0_Click()
    DoCmd.OpenQuery "Q_300円以下"
    DoCmd.OpenQuery "Q_コード単価"
End Sub