请问用CreateObject("Excel.Application") 后.怎么判断调用的EXCEL关了没?

--------------------编程问答-------------------- 简单的，设置一个模块变量，在打开文件的时候，设置为true，关闭时刻，设置false
这样，你就可以随时知道文件是开还是关闭了 --------------------编程问答--------------------

引用 1 楼 worldy 的回复:

简单的，设置一个模块变量，在打开文件的时候，设置为true，关闭时刻，设置false
这样，你就可以随时知道文件是开还是关闭了

LZ说的是用户不用程序中的关闭功能而是自行关闭了EXCEL
这样变量里的值应该也没修改过来

我有个笨点的办法：
查找所有进程看该EXCEL表格是否存在 --------------------编程问答-------------------- http://download.csdn.net/detail/veron_04/2341786 --------------------编程问答-------------------- --------------------编程问答-------------------- Workbook.Saved 就是表示是否已保存的。

Private Sub Command2_Click()

'... 具体 的操作



On Error Resume Next '加错误处理'



Dim bUnSaved As Boolean

bUnSaved = Not xlBool.ActiveWorkbook.Saved '用了 On Error Resume Next 后要避免在 If 语句中出错'

If bUnSaved Then

    MsgBox "文件未保存。",vbInformation

    Exit Sub

End If

xlBook.Close True '关闭工作簿

Set xlBook = Nothing

xlApp.Quit '结束EXCEL对象

Set xlApp = Nothing



end sub

补充：VB ,  基础类