如果只是关闭当前工作簿,可以用:
ThisWorkBook.Close False
如果要关闭所有工作簿并退出程序,可以试试:
Sub aa()
Application.Quit
If Workbooks.Count > 1 Then
For i = 1 To Workbooks.Count
SendKeys "{right}"
SendKeys "{right}"
SendKeys "{enter}"
Next
Else
SendKeys "{right}"
SendKeys "{enter}"
End If
End Sub
如何用VBA关闭Excel
最新推荐文章于 2023-09-02 02:49:32 发布