Dim excelapp As New Excel.Application
Call DetectExcel'''函数是判断EXCEL是否打开,如果打开就必须想关闭EXCLE程序excelapp.Workbooks.Open (App.Path + "\bzd.xls")
..............
excelapp.ActiveWorkbook.SaveAs ("路径")
''''关闭EXCEL代码
excelapp.ActiveWorkbook.Close
excelapp.Quit
Set excelapp = Nothing
问题是在WIN98的时候是可以关闭excel,在WIN2000的时候就不行,在任务管理器中还可以看到EXCEL,谢谢!
Call DetectExcel'''函数是判断EXCEL是否打开,如果打开就必须想关闭EXCLE程序excelapp.Workbooks.Open (App.Path + "\bzd.xls")
..............
excelapp.ActiveWorkbook.SaveAs ("路径")
''''关闭EXCEL代码
excelapp.ActiveWorkbook.Close
excelapp.Quit
Set excelapp = Nothing
问题是在WIN98的时候是可以关闭excel,在WIN2000的时候就不行,在任务管理器中还可以看到EXCEL,谢谢!
解决方案 »
- 好长时间没用vb写成程序,现在遇到一个收邮件的问题,大家帮我看看
- mysql最大并发的问题
- 请问如何使用commondialog实现保存和另存为的功能,非常感谢!!
- 非技术版问题解答以及VB版面部分斑竹的介绍
- image控件代替form的窗体移动功能!我的触发事件有问题,急!!
- 一个关于Combox的简单问题(在先等)!
- 分不在高有仙则灵 平面窗体怎么做?
- 如何控制vb程序的执行顺序或进程?
- 哪里有Visual Basic5.0下载?
- 两个程序的绑定
- 问题简单大家帮忙回答回答~!
- 安装的时候文件analyze.exe,mkss.exe一堆.exe文件打不开,srcsafe.ini,ssadmin.ini,template.ini打不开
你可以试着升级Office的版本、打一些补丁。
还有一个可能的解决办法是延时退出,我一直怀疑是因为Excel在卸载时要作的工作太多,所以VB退出了,它还没有退出,但我以前因为时间原因,所以一直没有去在这方面下功夫。另外,延时退出的时候,不要用sleep等函数,而是用Timer去定时退出。
先暂时将其Visible设为False,待程序退出后结束整个工程项目,看看是不是能关闭掉!