Question

我正在尝试从VBA运行Access宏并继续收到错误：运行时错误2485; Access无法找到对象'MyTest' 我的代码在下面 - 它很奇怪，因为这行： A.DoCmd.OpenModule“temp”，“MyTest” 工作（将模块打开到正确的位置）。宏是一个简单的测试;据我所知，所有路径都是正确的。谢谢！

Set A = Nothing
Set A = CreateObject("Access.Application")

A.Visible = False
A.OpenCurrentDatabase (DBFileName)
A.DoCmd.OpenModule "temp", "MyTest"

A.DoCmd.RunMacro "MyTest"
A.CloseCurrentDatabase
A.Quit
Set A = Nothing

Answer 1

我不确定这是否是您正在寻找的，但以下Excel宏启动宏＆＃34; MyTest＆＃34;来自Access文件中包含的模块＆＃34; filename＆＃34;：

Sub test_accesss()
    Set A = Nothing
    Set A = CreateObject("Access.Application")

    A.Visible = False
    A.OpenCurrentDatabase ("filename")
    A.Run "MyTest"
    A.CloseCurrentDatabase
    A.Quit
    Set A = Nothing
 End Sub

从Excel VBA运行Access宏时出现问题

1 个答案: