VBA-使用参数从Excel调用Access文件中的SUB

Question

我正试图使用Excel文件"Hoy.xlsm"从Access文件"Hey.accdb"调用一个子例程。该子例程的名称为"HelloWorld"，参数为"Para01"，为字符串。

有人能帮助我如何做到这一点吗

这是我在Excel文件中的编码，它不起作用：

Sub RunSubinAccesswithPara()
'Open Access file
Set Db = CreateObject("Access.Application")
Db.OpenCurrentDatabase "D:Database1Hey.accdb"
Db.Visible = True
Db.AutomationSecurity = msoAutomationSecurityLow
Db.Execute "HelloWorld('Y')"
End Sub

---

如有任何帮助，我们将不胜感激。

Answer 1

您可以使用Application.Run方法，如下所示：

DB.Run "HelloWorld", "Y"