在EXCEL中引用ACCESS数据库中的查询示例代码:
Dim db As Object Dim qdef as Object Set db = CreateObject("DAO.DBEngine.120").OpenDatabase("path to db") set qdef = db.QueryDefs("query name")