VBAで更新クエリを実行させるには

Executeメソッドで更新クエリを実行させることで、複雑な記述をしなくとも、更新することができる。

Sub Update_dao ()

  Dim db as dao.database

 Dim qd as QueryDef

Set db = CurrentDb ()

Set qd = db.QueryDefs(“queryname”)

qd.Execute

qd.Close

db.Close

End Sub