やり方
Accessのテーブルに対するクエリの動作確認サンプル
Dim sql_ As String: sql_ = "SELECT * FROM t_1 "
'クエリのSQL差し替え。
CurrentDb.QueryDefs("q_1").SQL = sql_
'クエリからSQL取得。
sql_ = CurrentDb.QueryDefs("q_1").SQL
'取得したSQLの中身確認。
Debug.Print sql_
クエリのSQLはAccessによる整形が入ることがある
前述のサンプル動作結果を見ると、改行と末尾の『;』が追加されています。
Accessのテーブルに対するクエリはこういった整形が入ります。
パススルークエリの場合は整形は入りません。
参考サイトさん
バージョン
Microsoft Windows [Version 10.0.19045.3324]
Microsoft Access for Microsoft 365 MSO (バージョン 2307 ビルド 16.0.16626.20170) 32 ビット