回复:如何解决wincc中不重复打开excel文件

夏历

  • 帖子

    736
  • 精华

    1
  • 被关注

    10

论坛等级:侠圣

注册时间:2008-03-15

白金 白金 如何晋级?

发布于 2009-09-27 00:50:39

2楼

quote:以下是引用youhm在2009-09-24 18:42:45的发言:
GetObject(,"Excel.Application")获取当前打开的Excel对象,如果获取不到再用CreateObject创建Excel对象

dim allbest
on error resume next
set allbest=getobject("Excel.Application")
if err.number<>0 then
set allbest=CreateObject("Excel.Application")
endif
err.clear
no error goto 0
set mybest=allbest.workboks.open"E:\***.xls"


可爱
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32569条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。