我在WinCC V6.0 SP3 ASIA中,组太了一个按钮,一个输入/输出域。对按钮写VBS代码,实现将输入/输出域中的数值写入Excel表格中。
我把输入/输出域改名为“IOField1”,并且在它的“属性”---“域类型”设置为“输入”。按钮的代码是按照《深入浅出WinCC》写的:
Dim objExcelApp
Set objExcelApp=CreateObject("Excel.Application")
objExcelApp.Visible=True
objExcelApp.Workbooks.Open"D:\000.xls"
objExcelApp.xls.Cells(4,3).Value=ScreenItems("IOField").OutputValue
objExcelApp.ActiveWorkbook.Save
objExcelApp.Workbooks.Close
objExcelApp.Quit
Set objExcelApp=Nothing
可是,运行后,把“12”输入到输入/输出域中,点按钮,只是该Excel表格被打开,可是并没有数据被写入啊。为什么?
最佳答案
错了2个地方,都在这一句:
objExcelApp.xls.Cells(4,3).Value=ScreenItems("IOField").OutputValue
改成:
objExcelApp.Cells(4,3).Value=ScreenItems("IOField1").OutputValue
注意:输入/输出域名为“IOField1”
提问者对于答案的评价:
ok
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc276828.html