vba关闭winword.exe进程的问题

amesman

在excel里用vba打开word文件后(设置不可见),
尽管用application.close及application.quit等命令关闭对象,也断开了excel与word的连接(如Set myWord = Nothing )
但进程里依然有winword.exe的进程.不知大家都有没碰到这种情况,怎样解决?
期待版主和各位高手......

amesman

郁闷,用api函数是解决问题了,但有点大材小用的味道.
vba里面就没有更好的解决方法?

守柔

原帖由 amesman 于 2009-3-28 22:54 发表
在excel里用vba打开word文件后(设置不可见),
尽管用application.close及application.quit等命令关闭对象,也断开了excel与word的连接(如Set myWord = Nothing )
但进程里依然有winword.exe的进程.不知大家都有没碰到 ...

我想是你的理解或者是VBA代码有些问题了。
您可以一下VBA帮助中关于CreateOjbect函数的相关内容。
另外，也请注意一下您的描述，Application.Close?Application对象有Close方法吗？
在Excel中，Application对象指向的是Excel.Appliation对象，而您需要退出的是Word.Application对象，在退出或者关闭Excel(或者结束过程）之前，应该是关闭Word.Application对象。
请参考http://club.excelhome.net/thread-413738-1-1.html七楼的贴子。

amesman

看了您的帖子,我反复调试了程序,终于发现问题所在:
我把生成word文件的代码做成了一个模块(用CreateOjbect函数打开word模板,再写入数据,另存),然后我在主程序里的for循环中使用了该模块,导致多次打开word模板,而每打开一次模板,进程里就多一个winword.exe进程,这样就会反复出现提示:因为它是在别处已打开 Word 无法保存此文件.
我今优化了一下代码,只打开一次模板,等所有操作完毕后,再关闭,但vba里面所提供的诸如close或quit等属性只能关闭word文档,不能关闭winword.exe进程,我最后还是调用了api才彻底关闭该进程.不过比当初已简化得多,运行速度也快很多,已完全满足要求了.
再次感谢守柔!
您的回贴是我学习的动力与莫大的鼓励!

pangliang071

http://download.csdn.net/detail/pangliang071/4527828
通过对象获得对象ＰＩＤ然后杀掉进程，非常好用

wplmj

amesman 发表于 2009-3-29 11:50
看了您的帖子,我反复调试了程序,终于发现问题所在:
我把生成word文件的代码做成了一个模块(用CreateOjbect ...

哥哥你好，小女子也遇到同样的问题——刚学vba，现在还是菜鸟一枚，能否请哥哥分享下关闭winword.exe的代码
PS：    Set myDoc = Nothing  
     Set myWord = Nothing
注：Dim myWord As Word.Application
    Dim myDoc As Word.Document
这样关闭不行，内存里还有winword.exe这个进程，小女子在此先谢谢哥哥

wplmj

wplmj 发表于 2013-4-17 18:07
哥哥你好，小女子也遇到同样的问题——刚学vba，现在还是菜鸟一枚，能否请哥哥分享下关闭winword.exe的代 ...

我的解决了——只需要把定义的application变量给quit就可以了，好兴奋哦O(∩_∩)O~

龙城飞将III

果然是word.application.quit 就可以了。
之前一直提示内存不足，可急坏了，最后想到去看进程，结果发现一堆winword.exe才知道是调用word.application没有关闭进程，终于解决了！

huxx1201

龙城飞将III 发表于 2016-9-4 13:21
果然是word.application.quit 就可以了。
之前一直提示内存不足，可急坏了，最后想到去看进程，结果发现一 ...

大神你好，word.application.quit可以解决，但每次都弹出是否保存的对话框怎么解决？默认保存或不保存用什么代码啊。

huxx1201

解决了，savechanges:=False