Office中国论坛/Access中国论坛

标题: 打开Excel文件后的烦恼事如何处理(已解决) [打印本页]

作者: koutx 时间: 2009-12-23 21:59
标题: 打开Excel文件后的烦恼事如何处理(已解决)
本帖最后由 koutx 于 2009-12-25 18:08 编辑

----------
-----------
以上是打开一个Excel文档的VBA代码

xlApp.Visible = True '使Excel可见

         MsgBox "Excel查找完成。", , "提示" '先阻止向下执行
         Set xlBook = Nothing
         xlApp.Quit
         Set xlApp = Nothing

没有MsgBox一行，则会马上关闭Excel，根本不容你处理Excel文档；
可加上这行Msgbox后，又会使Excel隐到Access后面去，还得单击任务栏上的Excel文档图标才能将其调至前面。有没有办法让Excel回到最前面呢？

作者: todaynew 时间: 2009-12-24 17:03
本帖最后由 todaynew 于 2009-12-24 17:06 编辑

删除xlApp.Quit即可。xlApp.Quit是退出xlapp，表现为所有用xlapp打开的book全部关闭。

作者: koutx 时间: 2009-12-25 18:07
可以，但以前不知怎么搞的，没有此句总是关不掉Excel进程。谢谢todaynew

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)