能打开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
[4221]
[6308]
[2924]
[4137]
[34632]
[2846]
[2964]
[2639]
[2949]
[2163]

客服
小程序
公众号