问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

听别说可以设制在禁用宏就关闭工作表的方法,哪位能指点下

发布网友 发布时间:2022-04-26 17:03

我来回答

1个回答

热心网友 时间:2023-10-15 23:57

当打开含有宏的文件时,如果“禁用宏”并打开文件后,所有编辑的VBA程序将失效。如何当用户打开Excel文件并禁用宏时,让文件自动关闭呢?
我们可以通过调用Excel4.0版(Excel的一个老版本)的宏命令来解决这个问题。因为“禁用宏”功能无法禁用4.0版本的宏。当您设置完成,再打开文件并点击禁用宏时,系统就会弹如下图所示提示信息,单击“确定”后文件就会自动关闭。

禁用宏后的提示信息
设置步骤和使用方法:
(1)打开要设置的文件,在VBE编辑器中添加一个模块。写入以下代码:
Function NoRunMacro () ’A3单元格中的字符
End Function
(2)在任一个工作表标签上单元格右键,执行“插入”命令打开如下图所示对话框,在常用选项卡中选取“MS Excel4.0宏表”项,然后单击“确定”按钮,在当前工作簿中就会新建一个默认名Macro1的“宏表”,更改表名为“宏表1”

在宏表的以下单元格中输入公式:

(3)逐个选取工作簿中其他工作表,然后执行【插入】/【名称】/【定义】命令,打开【定义名称】对话框。在“在当前工作簿中的名称”框中输入:工作表名称+Auto_Activate。如下图所示在Sheet1工作表中打开【定义名称】对话框,定义的名称就为:Sheet1!Auto_Activate。
然后在引用位置文本框中输入:=宏表1!$A$2。

★提示:对于一个工作表数量较多的工作表逐个设置会很麻烦。所以这时可以只需为其中一个设置名称,但要保障“当打开工作簿时,必需是设置名称的工作表处于选取状态”★追问太给力了,你的回答完美解决了我的问题!

追答那就好

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
如何申办健康证、卫生许可证、营业执照、税务登记证?具体操作步骤是什么... 残步的意思是什么 ...出生,想以生辰八字五行来取个名字,请专家指教一下,谢谢 ...号8点生 男孩 五行缺木求各位大师起好记的名字来个小名 自考统计学概论和国民经济统计概论哪个难 国民经济统计概论2004年版图书简介 《我想有个家》这首歌在哪里可以免费下载? 从什么地方能找到吴子安的我想有个家铃声 平安喜乐什么意思 平安喜乐的意思 承欢记哪里可以看 蓝莓扦插育苗多久结果 求一段宏: 禁用宏则关闭excel 为什么盆栽的蓝莓一直不结果 excel 对不起由于禁用了宏,文件将自动关闭 怎么才能打开?一打开就提示所以接着关闭,没法打开 如何在EXCEL2007下实现:禁用宏,则关闭或退出工作簿 EXCEL 由于禁用了宏 本文件将自动关闭 蓝莓树苗要几年结果 突然之间打开所有Excel文件都出现禁用宏,关闭。 excel打开文件时,为什么出现由于禁用了宏,文件将自动关闭? 在打开EXCEL文件时,总是出现“禁用宏,关闭”,是什么原因? excel 一打开 就出现 “禁用宏 关闭 ”的提示,确定后表格自动关闭,怎么办? 我想问一下打开Excel是出现由于禁用了宏,本文件将自动关闭该怎么办? 我在打开EXCEL文件时,总是出现“禁用宏,关闭”,是怎么回事? 请问下有什么方法在EXCEL里选择禁用宏则关闭EXCEL只有启用宏才能打开文档 为什么我的京东金条借款审核通过却不能放款呢 打开excel,就出现“禁用宏,关闭”, 谁能告诉我京东金条显示你的借款申请未通过,暂时无法使用借款服务是怎么... 激活京东金条,审核需要多久 京东金条客服说额度是一次性审核的,借款需要再次审核怎么回事? 五年级上册语文书第八单元作文怎么写 蓝莓第一年结果第二年不开花了是怎么回事? win7安装 声卡驱动失败 (驱动精灵下载的也无法安装)。怎么办? win7驱动人生声卡安装失败 请问我在Win7下安装声卡驱动时安装失败并出现下面的对话框怎么解决? win7驱动安装声卡失败怎么办 win7安装声卡驱动失败,如图 WIN7声卡驱动安装失败,急!! win7下无法安装声卡驱动~~ 用驱动精灵安装声卡,一直显示失败,windows7 win7音频驱动安装失败怎么办 cad中,如何填充200x400的网格,请大侠们帮帮忙! Cad施工图客厅800.800格子怎么填充 cad土方方格网怎么画 工程上,用CAD画土石方断面图,请问图上的栅格是怎么画出来的? cad这图的网格图怎么画法,填充貌似不能实现啊,求画法 茄子,辣椒,西红柿酱怎么做 简单番茄酱茄子怎么做好吃又简单,做法图 163邮箱原来绑定的手机号没了 现在怎么解除绑定? 的做法,番茄酱茄子怎么做好吃,番茄酱茄子的家常做法 163邮箱更改手机手机号,别人发邮件给原来的邮箱号还能收到吗