求高人分析一下wincc导入excel的一段程序 点击:205 | 回复:0



gohepg

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:1帖 | 14回
  • 年度积分:0
  • 历史总积分:291
  • 注册:2011年3月11日
发表于:2011-07-24 09:29:21
楼主

能打开excel  但不能写入数据…… 求高手给分析一下

Dim objExcelApp
Dim tagjuli
Set tagjuli=HMIRuntime.Tags("juli")
Set objExcelApp=CreateObject("Excel.Application")
objExcelApp.Visible=True
objExcelApp.Workbooks.Open"D:\fj.xls"
objExcelApp.Worksheets(sheetname).Activate
tagjuli.Read
objExcelApp.Worksheets(sheetname).cells(4,2).value=tagjuli



热门招聘
相关主题

官方公众号

智造工程师