[已解决]AutomationSecurity 属性

爱疯

“当应用程序启动时，该属性自动设置为 msoAutomationSecurityLow。.......”

请问这句是什么意思？

谢谢！

[em04]

最佳答案

月排行榜 / 总排行榜

amulee

2009-10-10 15:41

恩，我是让你三个值都体会一下。

第一个是默认的。

Sub MyOpen1()
    Application.AutomationSecurity = msoAutomationSecurityLow '这个是默认的。没有改动过值的话这一句没有也无所谓，会启用宏。你也可以去掉这句，保存后退出Excel程序后再打开看看。
    Workbooks.Open ThisWorkbook.Path & "\open.xls"
End Sub

第二个，改为强制禁用宏
Sub MyOpen2()
    Application.AutomationSecurity = msoAutomationSecurityForceDisable
    Workbooks.Open ThisWorkbook.Path & "\open.xls"
End Sub

第三个，是你原先Excel里面工具--〉安全性的设置。我让你先将工具--〉安全性设置为中就是为了体现出三个值得区别。
Sub MyOpen3()
    Application.AutomationSecurity = msoAutomationSecurityByUI
    Workbooks.Open ThisWorkbook.Path & "\open.xls"
End Sub

跳转到最佳答案楼层

amulee

这个属性是指通过VBA打开其他文件时的安全属性设置。

给你做了个例子以说明这个属性的作用。

请将安全级别先设为中。

当Excel启动的时候，这个属性是默认是低，即通过VBA打开其他文件即会启用那个文件的宏。

 

RFqcsJHU.rar (9.86 KB, 下载次数: 6)

2009-10-10 12:25 上传

点击文件名下载附件
AutomationSecurity 属性

渡梦河

不是高、中、低吧，是禁用宏

爱疯

QUOTE:

以下是引用amulee在2009-10-10 12:25:00的发言：

这个属性是指通过VBA打开其他文件时的安全属性设置。

给你做了个例子以说明这个属性的作用。

请将安全级别先设为中。

当Excel启动的时候，这个属性是默认是低，即通过VBA打开其他文件即会启用那个文件的宏。

谢谢阿木！

VBA方式打开其他文件时，AutomationSecurity自动设为 = msoAutomationSecurityLow，是吗？

MyOpen2()运行后，open.xls是打开了，为什么不运行open.xls中的Workbook_Open()呢？

老虎的意思，我不懂[em04]

amulee

恩，我是让你三个值都体会一下。

第一个是默认的。

Sub MyOpen1()
    Application.AutomationSecurity = msoAutomationSecurityLow '这个是默认的。没有改动过值的话这一句没有也无所谓，会启用宏。你也可以去掉这句，保存后退出Excel程序后再打开看看。
    Workbooks.Open ThisWorkbook.Path & "\open.xls"
End Sub

第二个，改为强制禁用宏
Sub MyOpen2()
    Application.AutomationSecurity = msoAutomationSecurityForceDisable
    Workbooks.Open ThisWorkbook.Path & "\open.xls"
End Sub

第三个，是你原先Excel里面工具--〉安全性的设置。我让你先将工具--〉安全性设置为中就是为了体现出三个值得区别。
Sub MyOpen3()
    Application.AutomationSecurity = msoAutomationSecurityByUI
    Workbooks.Open ThisWorkbook.Path & "\open.xls"
End Sub

爱疯

AutomationSecurity 属性

安全性的四项与MsoAutomationSecurity3个常量间，存在对应关系吗？

amulee

没啥对应关系

爱疯

QUOTE:

以下是引用amulee在2009-10-10 16:06:00的发言：
没啥对应关系

谢谢 [em27]

将安全性由中改为低，该怎么写呀？ 我录了下，无代码。

zsd5237

学习[em02][em02]