Ms access 为什么在宏完成运行后从VBA打开Access实例时退出？_Ms Access_Vba_Ms Access 2010

Ms access 为什么在宏完成运行后从VBA打开Access实例时退出？

ms-access vba

Ms access 为什么在宏完成运行后从VBA打开Access实例时退出？,ms-access,vba,ms-access-2010,Ms Access,Vba,Ms Access 2010,我想知道以前是否有人遇到过这种情况。当我通过VBA创建Access（2013）实例时，Access应用程序会在宏完成运行时退出，即使我在子例程中的任何位置都没有任何应用程序。quit语句。有什么想法吗 Sub Test() Dim axApp As Access.Application Set axApp = CreateObject("Access.Application") axApp.Visible = True End Sub 新的Access应用程序实例由ax

我想知道以前是否有人遇到过这种情况。当我通过VBA创建Access（2013）实例时，Access应用程序会在宏完成运行时退出，即使我在子例程中的任何位置都没有任何

应用程序。quit

语句。有什么想法吗

Sub Test()
    Dim axApp As Access.Application
    Set axApp = CreateObject("Access.Application")
    axApp.Visible = True
End Sub

新的Access应用程序实例由axApp对象变量创建和引用

在您的过程结束时，axApp超出范围并被销毁。由于它的破坏，它引用的Access应用程序实例被关闭

如果希望在VBA过程完成后Access实例继续存在，请将其

.UserControl

属性设置为True

子测试（）
将axApp设置为Access.Application
设置axApp=CreateObject（“Access.Application”）
axApp.Visible=True
axApp.UserControl=True
端接头

我已经编辑了我的答案以包含示例代码。