DatabaseオブジェクトとQueryDefsオブジェクトを使う。
for eachループを使ってやればQueryDefsオブジェクトから各QueryDefオブジェクトを列挙できる。あとは".name"プロパティで名前を、".SQL"プロパティで中身のSQL文を取り出すことができる。
"QueryDefs.Item(x).〜"という記法は使えるだろうか?
これで、全クエリの名前:SQL対応表を作ってやることができそうだ。あとはこれをどう書き換えるかだな・・・
(追記)とりあえずループでクエリ名全件を拾い、その名前と内容SQLをテーブルに書き込むことに成功した。さてどうする?
