我用WINCC和Excel做DDE通讯,Excel为服务器(本地),怎样在Excel中显示和设定外部变量值呢?有使两个变量相等的赋值函数语句吗?请前辈指教,多谢了!
问题补充:
我的意思是,在WINCC和EXCEL之间建立了很多通讯变量,这些变量怎样和WINCC的外部变量(PLC的变量)建立连接呢?使在EXCEL中能显示过程值。还是有其他方法呢?请指教!
最佳答案
精华帖子里有现成的代码,名字叫“取之于民,用之于民”,写得非常的好!
也可以试试这个
Dim objExcelApp,oWorkBook
Set objExcelApp=CreateObject("Excel.Application.9")
objExcelApp.Visible=False
Set oWorkBook=objExcelApp.Workbooks.Open("d:\book1.xls")
Dim iBlankLine
iBlankLine=oWorkBook.ActiveSheet.Columns(1).Find("").Row
objExcelApp.Cells(iBlankLine,1).Value=HMIRuntime.Tags("text_1").Read
objExcelApp.Cells(iBlankLine,2).Value=HMIRuntime.Tags("text_2").Read
objExcelApp.Cells(iBlankLine,3).Value=HMIRuntime.Tags("text_3").Read
objExcelApp.Cells(iBlankLine,4).Value=HMIRuntime.Tags("text_4").Read
oWorkBook.Save
objExcelApp.Workbooks.Close
objExcelApp.Quit
Set objExcelApp=Nothing
提问者对于答案的评价:
非常感谢!
原创文章,作者:more0621,如若转载,请注明出处:https://www.zhaoplc.com/plc274886.html