怎样在打开Excel工作簿时禁止Auto_Open宏的运行
时间:2022-12-30 17:28:51
大家知道,一个包含宏的工作簿如果VBA代码中包含Workbook.Open 事件或模块中含有Auto_Open宏时,打开该工作簿就会运行指定的宏代码。但有时我们希望这些包含在Workbook.Open 事件或Auto_Open宏中的代码在打开工作簿时不自动运行,例如在该代码中还在调试过程中,或其中包含错误时。要实现这一点,可以在打开该工作簿时按住Shift键,具体方法如下:
Excel 2003:
一、当宏安全性设置为“低”时
方法一:单击菜单“文件→打开”,在“打开”对话框中选择指定的工作簿,然后按住“Shift”键,单击“打开”按钮。
方法二:单击菜单“文件→打开”,在“打开”对话框中选择指定的工作簿,然后按住“Shift”键,双击该工作簿。
方法三:如果指定的工作簿名称包含在“文件”菜单中的“最近使用的文件列表”中,可以在按住“Shift”键的同时,单击“最近使用的文件列表”中的文件名。
二、当宏安全性设置为“中”时
如果宏安全性设置为“高”或“非常高”,虽然打开工作簿时Workbook.Open 事件或Auto_Open宏中的代码不会自动运行,但同时宏也会被禁用。如果宏安全性设置为“中”,可以按正常方式打开工作簿,Excel会弹出一个“安全警告”对话框,这时在按住“Shift”键的同时,单击“启用宏”按钮,Workbook.Open 事件或Auto_Open宏中的代码就不会被执行,但由于已启用了宏,以后工作簿中的宏代码仍可被执行。
Excel 2007和Excel 2010:
一、当宏安全性设置为“启用所有宏”时
按照上述Excel 2003中当宏安全性设置为“低”时的方法进行操作。
二、当宏安全性设置为“禁用所有宏,并发出通知”时
1.按上述Excel 2003中当宏安全性设置为“低”时的方法进行操作。
2.Excel会弹出一个“Microsoft Office Excel 安全声明”的对话框,这时直接单击“启用宏”按钮即可,无需再按“Shift”键。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
Win10没有找到家庭组连接 家庭组连接Win10找不到怎么办
![](https://img.aspxhome.com/file/2023/1/a274251_0s.png)
Win10系统怎么改装Win7系统?Win10改装win7详细教程
![](https://img.aspxhome.com/file/2023/26/a220096_0s.png)
Win7网络连接不上且提示错误797的原因及解决方法
![](https://img.aspxhome.com/file/2023/28/a249974_0s.jpg)
Win8.1提示存在问题并显示错误代码80070490解决方法
![](https://img.aspxhome.com/file/2023/4/a308778_0s.jpg)
xp Ghost系统无法安装显卡驱动出现驱动无法安装或安装失败的问题
![](https://img.aspxhome.com/file/2023/29/a254003_0s.jpg)
ppt中如何加入word文件_把word文档内容导入ppt教程
![](https://img.aspxhome.com/file/2023/5/a315169_0s.png)
win10输入法不见了怎么办?win10输入法图标不见了的原因和解决方法
![](https://img.aspxhome.com/file/2023/29/a253523_0s.jpg)
什么是区块链技术,它有什么特点
win7开机怎么加速?windows7开机加速全攻略
![](https://img.aspxhome.com/file/2023/29/a252491_0s.jpg)
win10开始菜单点击没反应出现错误0x8000FFFF该怎么办?
Win11 Dev/Beta预览版22581.1更新发布(附更新修复汇总+安装)
![](https://img.aspxhome.com/file/2023/28/a240555_0s.png)
MAC OS X替换Finder字体以及恢复默认值的方法
![](https://img.aspxhome.com/file/2023/8/a215148_0s.jpg)
魅族16xs怎么开启护眼模式?魅族16xs开启护眼模式的方法
![](https://img.aspxhome.com/file/2023/6/a325006_0s.jpg)
怎么解决Win10更新一直安装失败无法更新?
![](https://img.aspxhome.com/file/2023/26/a222458_0s.png)
360浏览器打开新网页时停留在原网页解决方法
![](https://img.aspxhome.com/file/2023/7/a326985_0s.png)
excel中trunc函数的含义与作用
搜狗输入法截图快捷键是什么?
![](https://img.aspxhome.com/file/2023/5/a317676_0s.jpg)
如何为WPS word设置多个背景
![](https://img.aspxhome.com/file/2023/9/a185209_0s.png)
PPT图片如何变成倾斜版?PPT图片倾斜效果的设置方法
![](https://img.aspxhome.com/file/2023/10/a350421_0s.jpg)
怎样设置wps右侧的工具栏
![](https://img.aspxhome.com/file/2023/0/a163690_0s.jpg)