使用 VBA 启用 Outlook 宏

Question

我的任务是修改一个基于 VBA 构建的应用程序，该应用程序内置于 Microsoft Office Outlook 应用程序中。 我们最近从 Office 2016 升级到了 Office 2021，这对于 Office 的运行方式来说是一个巨大的差异。 为了使我们的应用程序正常工作，在设置 vbscript 代码中，我们必须在 Outlook 中启用宏，否则默认情况下不允许它们，并且应用程序将无法工作。 我们有一个脚本可以做到这一点，但自从升级以来，新办公室似乎忽略了这些代码行。

适用于 Office 2016 但被忽略的代码：

Dim olApp As Object
Set olApp = Createobject("Outlook.Application")
olApp.Application.AutomationSecurity 1
Dim exportedUIPath As String
Set olApp = Nothing
rem pause

Answer 1

Outlook 对象模型不提供

AutomationSecurity

属性。该代码很可能是从 Excel 借用的，您可以在其中找到相应的属性。对于 Outlook，您需要设置组策略或直接设置 Windows 注册表项。例如，请参阅自动化安全性和将宏安全性更改为“启用所有宏”的注册表设置了解更多信息。请注意，在这种情况下，必须重新启动 Outlook 才能应用新设置。