Word VBA教程:AutomationSecurity属性

返回或设置一个MsoAutomationSecurity 常量,该常量代表当程序打开文件时,Microsoft Word 使用的安全模式,可读写。

MsoAutomationSecurity 可以是下列 MsoAutomationSecurity 常量之一:
msoAutomationSecurityByUI  使用“安全”对话框指定的安全设置。
msoAutomationSecurityForceDisable  在程序打开的所有文件中禁用所有宏,而不显示任何安全提醒。
msoAutomationSecurityLow  启用所有宏,这是启动应用程序时的默认值。

expression.AutomationSecurity

expression   必需。该表达式返回“应用于”列表中的一个对象。

说明

当 Word 启动时,本属性自动设置为 msoAutomationSecurityLow,从而避免了中断依赖于默认设置的解决方案。当程序打开文件后,您应该小心地将本属性重新设为 msoAutomationSecurityLow,另外,在程序打开文件之前和之后,应该立即对本属性进行设置,以避免恶意破坏。

ScreenUpdating 设为 False,不会影响警告提醒和安全警告。DisplayAlerts 设置不会应用于安全警告。例如,如果用户将DisplayAlerts 设为 False,将 AutomationSecurity 设为 msoAutomationSecurityByUI,则用户处于“中等”安全级别,在该级别下运行宏时,会显示安全警告。这使宏可以捕获文件打开错误,而同时如果文件继续打开的话,显示安全警告。

VBA示例

本示例捕获当前的自动安全设置,将设置改为禁用宏,显示“打开”对话框以及在打开选定的文档后,将自动安全设置设为初始设置。


Sub Security()
    Dim secAutomation As MsoAutomationSecurity
    With Application
        secAutomation = .AutomationSecurity
        .AutomationSecurity = msoAutomationSecurityForceDisable
        With .FileDialog(msoFileDialogOpen)
            .Show
            .Execute
        End With
        .AutomationSecurity = secAutomation
    End With
End Sub

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号