作者：乔山办公网日期：
返回目录：excel表格制作
你不是保存了吗？
oXL.save(filename); //保存对应的excel文件
1、打开Excel 2003或2007或2010或2013完整版版百本。
2、进入“开发工具”一栏度。问
3、点选“Visual Basic”选项卡中的“编辑器”。答
4、双击“ThisWorkBook”或“工作专表1”。
5、在空白区域填写代码：Sub 保存所有已属打开的工作簿()，Dim i As Workbook，For Each i In Workbooks， If i.Path <> "" Then，i.Save， End If，Next ，End Sub。
6、点击“运行”。
7、点击“运行子过程/UserForm”就可以了。
Sub test()
With Application
.DisplayAlerts = True
.Quit
.DisplayAlerts = False
End With
End Sub
目的是“提示”出现后，不出现保存百窗口，不保存直接退出？
刚才搞了一下，不是很成功，逻辑上有度点儿问题。如果你想保存，这时候出现提示知，然后不保存退出道，这和一开始需要保存产生内了循环。如果直接在你的代码中增加ThisWorkbook.Close False，会产生保存后就可能不保存的退出容的问题。
或者你将Cancel = False，这样就会保存退出，感觉比较安全