我找到了一种从Access中列出Access中所有查询的简单方法。
Set dB = Application.CurrentData
For Each qry In db.AllQueries
Debug.Print qry.Name
Next qry
strMsg = " -- Queries listing complete -- "
Procedure_Done:
dmwListAllQueries = strMsg
Exit Function
Error_Handler:
strMsg = Err.Number & " " & Err.Description
Resume Procedure_Done
我真正想要做的是刷新Access中的所有选择查询,但我想在Excel中执行此操作。我在Excel中运行Access中的其他进程,我想尝试从Excel环境中控制所有内容,而不是在Excel和Access之间来回切换。
感谢所有人。