大神们，急！！我通过以上代码用vb6.0打开excel，第一次打开时表格正常显示，关闭表格后再通过

Question

大神们，急！！我通过以上代码用vb6.0打开excel，第一次打开时表格正常显示，关闭表格后再通过此代码打开表格时只是闪一下表格就消失了，当回到桌面再用excel打开新表格时会打开两个表，其中一个是vb 创建的book2。各位大神！怎样才能让vb 程序每次打开的excel可见呢？

Answer 1

每次操作完Excel对象后，一定记得要关闭对象，也就是从内存中清除Excel所占进程

追问

Exapp.quit后进程也去不掉，那怎样从内存中清除

追答

这样当然是去不掉的

追问

大神！那应怎样写代码呢？

用excel自身的宏关闭也不好使？！

如果单纯为了vb调用而关闭excel进程，那其他正在应用的exc也随之关了，vb 调用也就无意义了。

追答

Dim xlApp As Object
Dim xlBook As Object
Set xlApp = CreateObject("Excel.application")

xlApp.Visible = True
Set xlBook = xlApp.Workbooks.Open("你的Excel文件名称")
'......

xlBook.Close True, xlBook.FullName
xlApp.Quit
Set xlBook = Nothing

Set xlApp = Nothing

追问

感谢帮助，我试一下，无论成功否，先将分值赠上！如果还有向题请不啬赐教！