Question

你好，你给回答的判断EXCEL文件打开问题中，我想如打开了，请关闭它，这个代码如何写出。往往不是本程序打

开的EXCEL文件，无法关闭。请看看能不能写出判断打开后，关闭的代码。
谢谢

Answer 1

试试这个：
Sub 保存所有打开的工作簿后退出()
Dim wb As Workbook
MsgBox "保存所有打开的工作簿后退出 Excel."
For Each wb In Application.Workbooks
wb.Save
Next wb
Application.Quit
End Sub