wincc输入域的数据存入excel 点击:201 | 回复:0



王者之师--spider_man

    
  • 精华:19帖
  • 求助:0帖
  • 帖子:158帖 | 451回
  • 年度积分:0
  • 历史总积分:7932
  • 注册:2011年3月08日
发表于:2012-03-01 21:28:49
楼主

两个输入域  一个输入时间  一个输入数值   怎么写脚本把这两个变量存入excel且自动换行
答:利用vbs脚本,可以制作一个按钮,按钮属性里的动作中鼠标左键下写vbs代码。
例程如下:
Dim objExcelApp
Set objExcelApp = CreateObject("Excel.Application")
objExcelApp.Visible = 1
objExcelApp.Workbooks.Open "D:\1.xls" ‘‘‘‘填入你的表格的完全路径

dim io1
dim io2
Set io1 = screenitems("输入时间的io域的名字")
Set io1 = screenitems("输入数据的io域的名字")
objExcelApp.Cells(1,1).Value = io1.inputvalue     ‘‘单元格(1,1)中写io1的值
objExcelApp.Cells(2,1).Value = io2.inputvalue     


‘‘关闭excel表
objExcelApp.Workbooks(1).Close 
objExcelApp.Quit



楼主最近还看过


热门招聘
相关主题

官方公众号

智造工程师