vb用getobject函数打开excel进程能否让excel置顶显示?

陈晓猫 2011-10-15 02:25:35
vb用getobject函数打开excel进程能否让excel置顶显示?
代码如下:
On Error Resume Next
Set appexcel = GetObject(, "Excel.application")
If appexcel is nothing Then Set appexcel = CreateObject("excel.application")
appexcel.Visible = True
Set exwbook = appexcel.Workbooks.Add
Set exsheet = exwbook.Worksheets("sheet1")
exsheet.Activate
'do excel work……
最终createobject创建的excel进程可以置顶显示,但是如果先打开一个excel进程,那么就会调用getobject函数,造成excel不置顶显示,怎么办让excel前端显示?
...全文
173 回复 打赏 收藏 举报
写回复
回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
发帖
VB基础类

7617

社区成员

VB 基础类
社区管理员
  • VB基础类社区
加入社区
帖子事件
创建了帖子
2011-10-15 02:25
社区公告
暂无公告