弹出运行宏的对话框
时间:2022-03-29 18:16:34
excel文档退出时不提示保存是怎么了?
我的excel2007出了问题,文件编辑后,退出时不提示“保存”,在网上搜了一下,有人询问相同的excel 问题,很多回答都是说更改“保存自动恢复信息时间间隔”,或者重装office,没有其他修复这个问题的有效答案,最后在微软帮助网站里找到2个解决办法,一是按CTRL + S 保存更改,然后关闭该工作簿,这种办法可以保存更改,但不能解决出问题的excel,第二个办法有效的解决了问题,按下面的步骤便可恢修复:
1、启动 Excel 并创建一个新的工作簿。
2、按 ALT + F11 可打开 Visual Basic 编辑器。 (说明一下这一步:如果你按 ALT + F11没有弹出Visual Basic编辑器窗口,那么肯定是没有安装,需要office安装盘安装编辑器)
3、在 插入 菜单上单击 模块。 (或者直接双击左边的“工程资源管理器”)的“sheet1“或者其他的sheet,下图
4、新模块中键入下面的代码。
复制内容到剪贴板
Sub Caption_Macro()
’
’More code here.
’
’Changes the Caption property of the first window
Windows(1).Caption = "Window 1"
’Setting that the workbook has changed.
ActiveWorkbook.Saved = False
’
’More code here.
’
End Sub
5、 运行以上那段代码,运行方法:点击那个绿色的三角形按钮(类似播放按钮,见下图红色圈内标注),或者按键盘上的F5键,弹出运行宏的对话框,选择宏Caption_macro,然后单击运行。
6、再按 ALT + F11切换到 Excel。
7、单击 关闭。这时候可以看到提示您保存工作簿。
随意打开几个excel文档,试一下,随便输几个数字,再退出,一切都恢复正常。
提示:“宏”成功运行后,可以删除那段代码,或者退出的时候不选择“保存” ,即,不保存那段代码。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
Excel图表三级联动如何实现
![](https://img.aspxhome.com/file/2023/3/36233_0s.jpg)
Word怎么选中并进行翻译
![](https://img.aspxhome.com/file/2023/8/32038_0s.png)
Excel表格中使用vba宏帮你按条件拆分两个单元格中的数字
![](https://img.aspxhome.com/file/2023/2/43052_0s.jpg)
教你两个在Excel输入身份证的技巧
![](https://img.aspxhome.com/file/2023/3/a143473_0s.jpg)
返校季买苹果设备划算吗?2022苹果返校季活动什么时候开始?
![](https://img.aspxhome.com/file/2023/1/45291_0s.jpg)
在word文档中如何添加背景呢?
![](https://img.aspxhome.com/file/2023/2/24182_0s.jpg)
word文档的表前面怎么样添加序号
![](https://img.aspxhome.com/file/2023/6/19006_0s.jpg)
Word下修改默认新建样式模板方法
![](https://img.aspxhome.com/file/2023/7/35927_0s.png)
Win10电脑怎么有效的清理C盘垃圾?
![](https://img.aspxhome.com/file/2023/7/51887_0s.png)
word文档转成pdf时图章变成黑白色该怎么办?
![](https://img.aspxhome.com/file/2023/8/30688_0s.jpg)
word中使用黑白打印机打印彩色字体颜色太浅怎么办?
![](https://img.aspxhome.com/file/2023/6/27666_0s.jpg)
打开创建迷你图对话框
Excel 聊天 的实现方法
![](https://img.aspxhome.com/file/2023/7/43437_0s.jpg)
excel中只显示公式不显示数值怎么办?
![](https://img.aspxhome.com/file/2023/7/36537_0s.jpg)
Win10 PE是什么?Win10PE详细介绍
![](https://img.aspxhome.com/file/2023/5/49995_0s.jpg)
Win10电脑开机蓝屏失败的操作nvlddmkm.sys的解决方法
![](https://img.aspxhome.com/file/2023/3/52543_0s.jpg)
Siri最实用的功能,你用过了吗?
![](https://img.aspxhome.com/file/2023/0/45190_0s.png)
Win10通用应用版Office将于7月29日同步首发:完全免费
![](https://img.aspxhome.com/file/2023/0/15530_0s.jpg)
word文档怎么反片打印? word打印镜像的教程
![](https://img.aspxhome.com/file/2023/9/24049_0s.jpg)