VBA MS Access 代码无法运行答案

【问题标题】：VBA MS Access code wont runVBA MS Access 代码无法运行
【发布时间】：2013-05-03 09:15:04
【问题描述】：

我对 vba 很陌生，我正在尝试运行我的第一个 VBA 代码，我在表单中添加了一个按钮。然后我打开了点击事件并放置了

Private Sub run_Click()
MsgBox "hello World"
End Sub`

进入模块但是当我返回表单并单击表单视图中的按钮时没有任何反应，我做错了，我尝试运行许多其他代码片段但没有任何工作，我有点不确定我如何实际“运行”代码。

我点击运行然后我得到这个

我已经去了信任中心并启用了宏，但我仍然收到此错误？？

// 这个问题已经解决了我的信任中心没有启用marcos

【问题讨论】：

确保您的按钮被称为运行并且您没有使用保留名称来命名它。试试Private Sub CommandButton1_Click() MsgBox "hello World" End Sub
是的，我确定按钮名称和vba代码匹配，我已经上传了一张照片给你看！我遵循了一些不同的教程，但仍然没有任何效果

标签： ms-access ms-access-2007 vba

【解决方案1】：

如果这是一个全新的数据库，那么它可能还不是“可信”的。完全退出 Access，然后再次尝试打开数据库。如果您看到类似...的警告

安全警告：某些活动内容已被禁用。

...以及“启用内容”按钮，然后单击该按钮（启用宏和 VBA 代码），然后再次尝试您的表单。

【讨论】：

非常感谢，这解决了我的问题！一旦我在启用内容后重新启动访问，它就起作用了！这个问题让我很头疼！
@user2339714: 大声笑，你已经厌倦了在没有抬起汽车的情况下更换爆胎哈哈，祝你在 VBA 冒险中好运

【解决方案2】：

在您的 VBA 编辑器中执行以下操作：

创建一个用户表单并将其重命名为 yourFormName
在表单上创建一个按钮并将其重命名为 yourButton
双击您的按钮并粘贴以下内容
Private Sub yourButton_Click()
MsgBox "hello world"
Me.Hide
End Sub
插入一个模块并将此代码粘贴到
Sub RunMain()
With yourFormName
yourFormName.Show
Unload yourFormName
End With
End Sub
运行 RunMain 宏，然后单击按钮！

【讨论】：

【解决方案3】：

当 MS Access 首次在您的桌面上打开并且其中包含 VBA 时，您需要启用该代码。在 MS Access 2010 中，文件 --> 选项 --> 信任中心 --> 宏设置以及 ActiveX 设置。 security nanny-statists 已设置默认值，因此除非您特别允许，否则 VBA 不会运行。

【讨论】：