Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
VBA-使用参数从Excel调用Access文件中的子文件_Excel_Ms Access_Vba - Fatal编程技术网

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

VBA-使用参数从Excel调用Access文件中的子文件,excel,ms-access,vba,Excel,Ms Access,Vba,我试图使用Excel文件“Hoy.xlsm”从Access文件“Hey.accdb”调用一个子例程。子例程的名称是“HelloWorld”,参数“Para01”是一个字符串 有人能帮我解决这个问题吗? 以下是我在Excel文件中的编码,它不起作用: Sub RunSubinAccesswithPara() 'Open Access file Set Db = CreateObject("Access.Application") Db.OpenCurrentDatabase "D

我试图使用Excel文件“Hoy.xlsm”从Access文件“Hey.accdb”调用一个子例程。子例程的名称是“HelloWorld”,参数“Para01”是一个字符串

有人能帮我解决这个问题吗? 以下是我在Excel文件中的编码,它不起作用:

Sub RunSubinAccesswithPara()

'Open Access file
Set Db = CreateObject("Access.Application")
        Db.OpenCurrentDatabase "D:\Database1\Hey.accdb"
        Db.Visible = True
        Db.AutomationSecurity = msoAutomationSecurityLow
        Db.Execute "HelloWorld('Y')"

End Sub

非常感谢您的帮助。

您可以使用以下方法:

DB.Run "HelloWorld", "Y"

只需检查:您是否启用了访问引用?到底是什么不起作用?什么错误信息等?参数中是否正确使用引号?