如何用vba实现当关闭工作簿时能显示自打开工作簿后所作的所有操作，未点保存的也能显示？
- VBA怎样关闭工作簿和退出Excel?
- 急求VBA代码：合并工作簿后，如何关闭所有打开的工作簿（不含汇总表）？
- 用VBA后台打开工作簿,关闭打开的工作簿时界面上仍可见，不能隐藏
- vba的问题，怎样才能做到关闭工作簿（即点击表格右上角“X”按钮）后就自动打开表单（相当于工作簿的
VBA怎样关闭工作簿和退出Excel?
要用VBA来关闭工作簿，用Workbook.Close 方法即可，而要退出Excel，则用Application.Quit 方法：
关闭活动工作簿，如果工作簿有更改，提示是否保存：
Sub CloseWorkbook()
ActiveWorkbook.Close
End Sub
如果要避免出现提示，可添加“SaveChanges”参数，如直接保存并关闭工作簿：
Sub ClostAndSaveWorkbook()
ActiveWorkbook.Close Savechanges:=True
End Sub
将上述代码中的“True”改为“False”，则直接关闭工作簿而不保存。
关闭所有打开的工作簿，并提示是否保存：
Sub CloseAllWorkbooks()
On Error Resume Next
Workbooks.Close
End Sub
退出Excel，并提示对有更改的工作簿进行保存：
Sub QuitExcel()
Application.Quit
End Sub
保存活动工作簿并退出Excel：
Sub SaveActiveWorkAndQuit()
ActiveWorkbook.Save
Application.Quit
End Sub
下面的代码在退出Excel时都不会提示是否保存工作簿。
保存所有打开的工作簿并退出Excel：
Sub SaveAllAndQuit()
For Each wbk In Workbooks
wbk.Save
Next
Application.Quit
End Sub
退出Excel，所有的改动都不保存：
Sub QutiAndNoAlerts()
Application.DisplayAlerts = False
Application.Quit
End Sub
急求VBA代码：合并工作簿后，如何关闭所有打开的工作簿（不含汇总表）？
有两种方法关闭
1，合并一个关一个(这个就不用说了)
2，全部合并完成后再一起关闭（循环关闭）
Dim wb As Workbook
For Each wb In Workbooks
If wb.Name <> 汇总表的名字 Then
'屏蔽对话框
Application.DisplayAlerts = False
‘关闭保存
wb.Close savechanges:=True
Application.DisplayAlerts = True
end if
next
我程序是这样用的，没什么问题，希望对你有帮助
用VBA后台打开工作簿,关闭打开的工作簿时界面上仍可见，不能隐藏
oWB.windows(1).visible=false
加这个语句
OWB表示你打开的工作簿
vba的问题，怎样才能做到关闭工作簿（即点击表格右上角“X”按钮）后就自动打开表单（相当于工作簿的
没看懂你 要表达的问题是什么？
如果在关闭事件下加一条调出封面的命令，可正常调出封面表单，但打开时表单上的这个按钮是可以正常退出的，为什么，想不通，
什么想不通？？？？