Sub 关闭方法1()
Application.DisplayAlerts = False
ThisWorkbook.Save
Application.Quit
ThisWorkbook.Close
Application.DisplayAlerts = True
End Sub
'---------------------------------------------
Sub 关闭方法2()
Application.DisplayAlerts = False
ThisWorkbook.Save
'Application.Quit
Application.DisplayAlerts = True
Shell "taskkill /f /im EXCEL.EXE"
End Sub
是这样的,Close和Quit方法,是可以退出工作簿,和直接彻底关掉Excel的Application的背景界面的,但是必须有先后顺序,你得先用Quit再接Close语句(比如上面方法1),原因是:用了Close之后,再接Quit,你的VBA工程就没有对象支持了,剩下任何代码都无法继续依托Excel对象运行。也可以用另一种方法(比如上面方法2),你用代码保存文档,然后用Bat(批处理)里面的方法,也就是用taskkill /F /IM “程序名称”方法在保存文档之后强制关闭Excel应用界面,这种方法比较彻底,无残留。
如果a是b通过vba调用excel application打开的, 那代码关闭它很容易如果不是, 那需要调用windows API遍历目前所有进程, 然后判断哪个excel进程是需要关闭的, 关闭即可
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)