如何用vba强制启用所有宏? - VBA - ExcelOffice

如何用vba强制启用所有宏?





在excel“信任中心”的“宏设置”中,有“启用所有宏”、“禁用所有宏,并且不通知”、“禁用所有宏,并发出通知”、“禁用无数字签署的所有宏”等4个宏设置选项。

如何用vba开启“信任对vba工程对象模型的访问”?一文中介绍的,以上的设置也是存储在注册表键值中的,不同的office 版本对应的键值是不同的。

在excel 14.0、15.0版本中,“宏设置”对应的键值是

HKEY_CURRENT_USER\Software\Microsoft\Office\版本号\Excel\Security\VBAWarnings

在excel 之前的版本中,“宏设置”对应的键值是

HKEY_CURRENT_USER\Software\Microsoft\Office\版本号\Excel\Security\Level

它的数据如果是1,表示开启所有宏。

基于以上的认识,再结合注册表键值修改的相关文章,可以使用以下的vba代码启用所有宏或者禁用所有宏:

由于在禁止所有宏的情况下,vba代码无法运行,可以使用如下的vbs代码在office软件之外强制启用宏:

在一个空白的记事本下输入以上代码,然后将扩展名改为.vbs即可。

打赏

发表评论