首页 文章

宏错误2001 Autoexec访问宏

提问于
浏览 次
2

我在Access 2016数据库上设置了Autoexec宏，以确定基于 Environ("USERNAME") 打开哪个表单 .

当我打开数据库时，我得到一个宏错误2001.如果我单击停止所有宏，我可以继续使用数据库没有问题，直到我更改文件名，然后问题再次发生 .

是否有任何选项可以防止发生此错误？

被调用的代码是

LUser = LCase(Environ("USERNAME")) 'Get current username

DoCmd.OpenForm "frmDash", acNormal, , , , acWindowNormal

If IsNull(DLookup("[sysname]", "tblaccmannew", "sysname=" & "'" & LUser & "'")) Then
    DoCmd.OpenForm "frmSearch", acNormal, , , , acWindowNormal
    Forms!frmDash.Visible = False
End If
ms-access access-vba

2 回答

  • 3

    您需要“信任”数据库的位置 .

    .

    指定受信任位置（Access 2013和2016）

    在“文件”选项卡上，单击“选项” . 在“访问选项”对话框的左侧，单击“信任中心” . 在右侧的“Microsoft Office Access信任中心”下，单击“信任中心设置” . 在“信任中心”对话框的左侧窗格中，单击“受信任位置” . 要添加网络位置，请在右窗格中选中“在我的网络上允许受信任位置”复选框 . 单击“添加新位置” . 在“Microsoft Office受信任位置”对话框中，使用以下方法之一：在“路径”框中，键入要添加的位置的完整路径 . 单击“浏览”以浏览到该位置 . 要指定新受信任位置的子文件夹也应受信任，请选中此位置的子文件夹也是受信任的复选框 . （可选）在“描述”框中，键入受信任位置的描述 . （资源）

    回复于
  • 0

    另请注意;产品的嵌入式功能可以打开初始表单，因此不需要自动执行程序 . 查看“选项”“当前数据库”

    回复于

相关问题