如何在关闭excel工作簿时不出现保存工作簿的提示？
发布时间：2023-07-29 14:09:33
Q：在使用Excel时，如果对工作表进行了修改但没有保存，在关闭该工作簿时就会出现下所示的信息提示框。能够在任何情况下关闭工作簿时避免出现这个提示框吗？
A：我们知道，在VBA中，可以使用 Close方法关闭工作簿。例如，下面的语句关闭当前工作簿：
ThisWorkbook.Close
然而，如果在上次保存后又对工作簿进行了修改，那么就会弹出上所示的对话框。
下面介绍的4种方法，可以避免在关闭工作簿时出现所示的对话框。
方法1：在关闭工作簿之前先进行保存操作
在Workbook_BeforeClose事件中，输入下面的代码：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Save
ThisWorkbook.Close
End Sub
方法2：设置Close方法的参数值
如下面的代码所示：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Close SaveChanges:=True
End Sub
此时，在关闭工作簿的同时也会保存对其所做的修改。
当然，如果将参数SaveChanges的值设置为False，在关闭工作簿时不会出现消息框但同时在上次保存工作簿之后所做的修改也会丢失。
方法3：屏蔽掉警告消息框
将DisplayAlerts属性设置为False，屏蔽掉Excel弹出的警告消息。代码如下：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.DisplayAlerts = False
ThisWorkbook.Close
End Sub
注意，这种情形下，你在上次保存工作簿之后，对该工作簿做的任何修改都不会保存。
方法4：设置Saved属性
如下面的代码所示：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ThisWorkbook.Saved = True
ThisWorkbook.Close
End Sub
将工作簿的Saved属性设置为True，告诉工作簿不需要保存。注意，此时你在上次保存工作簿后对该工作簿进行的修改不会被保存。
小结
上面介绍的方法都可以避免Excel信息框的出现，但使用后面两种方法时要慎重，特别是你要保存对工作簿所做的修改时，以防重要信息没有保存。
0
投稿猜你喜欢
关于下一代 Apple TV 的传闻已经曝光了一段时间，但未知苹果打算何时发布新品。今日，外媒的最新消息指出，苹果正在为 Apple TV- Excel提供了一种从值列表中选择值的简便方法。我经常在动态Excel报表中使用此功能来选择日期，区域，产品和其他设置。例如，在这里，单元格
- 滴答清单APP怎么设置重复时间？当我们在使用滴答清单软件时，要是想每天都添加任务和事件，应该怎么去设置重复的时间呢？其实操作起来很简单，下面
- win7系统如果出现蓝屏会给出不同的代码，代码表示了不同的故障原因，方便用户采取相应对策。那蓝屏代码0x00000f4是怎么回事呢？最大的可
- 地下城与勇士更新时进度条卡住不动怎么办？最近有用户反映在更新DNF游戏时，进度条一直不会动，卡住了，并且无法更新游戏，该如何解决这个问题？请
- Win10预览版11099升级后出现"WSClient.dll出错丢失条目"怎么办？ 很多用户反映，win10升级110
- 使用电脑就得考虑到C盘空间容量，无论是软件还是系统，还是令人烦不胜烦的缓存。装上Win10C盘空间就直接满了，那就想想怎么办，想不出办法就看
- 具体如下：1、设备管理器-系统设备，看intel management engine interface驱动程序版本，如图1所示：2、Wi
- 在Excel中经常需要录入文本里的数据，如果手动录入会显示得太慢，这个时候就需要用到转换的功能。下面是小编带来的关于如何将txt转换成exc
- win10系统怎么美化？很多用户都喜欢给自己的电脑设置喜欢的主题，但是还有部分用户不是很会，这里小编为广大用户们准备了超多优化主题设置的方法
- Win10开启WiFi时的“无法启动承载网络”错误怎么办?Win10系统下可以用命令提示符开启WiFi，把笔记本设置为WiFi热点。在这个过
- Win8客户预览版怎么安装?Win8安装教程跟Win7安装教程几乎一样，因此安装Win8的方法多达10多种也不足为其!笔者在此介绍成功率最高
- Excel中经常需要使用公式对数据进行计算，表格数据具体该如何利用公式进行计算呢?下面是由小编分享的excel表使用公式计算的教程，以供大家
- 在这个什么都强调可视化、到处都是图案图标的时代，如果你在制作图表时，还只是用一般的柱形图、折线图和饼图，似乎就显得太单调了。但是，华丽的信息
- 今天，微软已经在中国官方商城正式上架了Windows 10，但目前仅有家庭版可选，售价888元。最后，需要注意的是，国内Windows 10
- chipeasy怎么用？chipeasy芯片无忧可以全方位的对USB设备进行检测，为用户提供USB设备的制造商、芯片信息、固件信息等多种详尽
- excel经常需要添加多个工作簿，那么我们在单个工作簿当中的求和已经非常熟悉了，如果需要两个甚至多个工作簿当中的数据进行合并计算，该如何去操
- Word的页面背景主要用于创建更有趣味的Word文档背景，Web 版式视图和阅读版式视图可显示背景。以下小编整理的页面背景的用法，供大家参考
- LOL英雄联盟不能更新怎么办？LOL英雄联盟更新时提示错误代码280该如何解决？下面就给大家分析LOL英雄联盟更新失败提示错误代码280的原
- 如何修改虚拟内存，在使用win8过程中貌似很多朋友都不知道如何操作，下面以图文的形式为大家详细介绍下1. 打开桌面的计算机，右键属性;2.
