读取 Excel VBA 宏安全设置

Read Excel VBA Macro Security Settings

我创建了一个启用宏的 Excel 工作簿,它要求用户在 Excel 宏安全设置中启用“信任对 VBA 项目对象模型的访问”。

我忘了我已经这样做了,我的同事在尝试 运行 宏时卡住了(没有响应)。

这个window也可以用这个代码调出来:

Application.CommandBars.ExecuteMso("MacroSecurity")

我可以使用 VBA 以编程方式确定此复选框的值吗?我希望能够在允许用户 运行 可能挂断他们机器的宏之前检查用户是否启用了此功能。

谢谢大家

Private Function VBATrusted() As Boolean
    On Error Resume Next
    VBATrusted = (Application.VBE.CommandBars.Count) > 0
End Function