设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1522|回复: 2
打印 上一主题 下一主题

[与其它组件] 打开Excel文件后的烦恼事如何处理(已解决)

[复制链接]
跳转到指定楼层
1#
发表于 2009-12-23 21:59:11 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
本帖最后由 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回到最前面呢?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2009-12-24 17:03:20 | 只看该作者
本帖最后由 todaynew 于 2009-12-24 17:06 编辑

删除xlApp.Quit即可。xlApp.Quit是退出xlapp,表现为所有用xlapp打开的book全部关闭。
3#
 楼主| 发表于 2009-12-25 18:07:38 | 只看该作者
可以,但以前不知怎么搞的,没有此句总是关不掉Excel进程。谢谢todaynew
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-18 07:50 , Processed in 0.089497 second(s), 27 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表