Application.AutomationSecurity 属性 (PowerPoint)
代表以编程方式打开文件时 Microsoft PowerPoint 使用的安全模式。 读/写。
语法
expression。 AutomationSecurity
expression:表示 Application 对象的变量。
返回值
MsoAutomationSecurity
备注
当应用程序启动时,此属性将自动设置为 msoAutomationSecurityLow 。 因此,为了避免破坏依赖于默认设置的解决方案,您应该注意,此属性重置为 msoAutomationSecurityLow 在以编程方式打开文件后。 此外,以避免恶意 subversion,您应立即之前和之后以编程方式打开的文件设置该属性。
DisplayAlerts 属性的值不适用于安全警告。 例如,如果用户设置 DisplayAlerts 属性等于 False ,并 msoAutomationSecurityByUI , AutomationSecurity 属性,而使用者则在中等安全级别上,将有安全警告时运行宏。 这使宏可以捕获文件打开错误,而仍将显示安全警告如果成功打开文件。
AutomationSecurity 属性的值可以是其中一个 MsoAutomationSecurity 常量。
常量 | 说明 |
---|---|
msoAutomationSecurityByUI | 使用 "信任中心" 对话框中指定的安全设置。 |
msoAutomationSecurityForceDisable | 禁用以编程方式打开的所有文件中的所有宏,而不显示任何安全警告。 |
msoAutomationSecurityLow | 启用所有的宏。 此为启动应用程序时的默认值。 |
示例
本示例捕获当前的自动安全设置,将该设置更改为禁用宏,显示“打开”对话框,并在打开选定的演示文稿之后将自动安全设置恢复为其原始设置。
Sub Security()
Dim secAutomation As MsoAutomationSecurity
secAutomation = Application.AutomationSecurity
Application.AutomationSecurity = msoAutomationSecurityForceDisable
Application.FileDialog(msoFileDialogOpen).Show
Application.AutomationSecurity = secAutomation
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。