MS Access 覚書 VBA で既存クエリのSQL文を取得、変更
探してもなかなかみつからなかったので、覚書。
Set myDB = CurrentDb
‘ 他のDBなら: Set mydb = OpenDatabase(“C:VBBIBLIO.MDB”)
‘QueryDef 編集用に開く
Set myQuery = myDB.QueryDefs(“クエリ名”)
‘ SQLを取得
strSQL = myQuery.SQL
‘SQLを設定
myQuery.SQL = “select * from テーブル名;”
‘close 処理
myQuery.Close
myDB.Close
set myQuery = Nothing
set myDB = Nothing