作者：乔山办公网日期：
返回目录：excel表格制作
试试
iExcel.Quit False
很可能是Excel卡在保存对话框那里了,如果Excel窗口可见,应该可以看到弹出这个对话框.
xlbook.Close (True)
xlApp.Quit '退出EXCEL
Set xlApp = Nothing
如果，进程被占用，用shell把EXCEL进程结束了，是最好的办法！
Workbooks("XXXX.xls").Close False/True
将XXXX.xls换成你要关闭的文件名（必须确保已经打开），如果不保存关闭，则参数用False，反之用TRUE
Shell "cmd.exe /c taskkill /f /im excel.exe", vbHide
如果你打开了多个EXCEL，即执百行多次，度如果不知道多少，可以判断进内程是否存在再执行。
代码容：
BACKENDP:
If CheckApplicationIsRun("EXCEL.exe") = True Then
Shell "cmd.exe /c taskkill /IM EXCEL.exe /F /T", vbHide
GoTo BACKENDP:
End If