再请教:
通过事件触发 将wincc中变量的值写到excel中,temprature->变量
程序没有调试通过,以下是代码,帮忙给看下
Dim g_excelfilename
Dim excel

g_excelfilename ="E:\111111\Excel.xls"
Set excel = CreateObject("Excel.Application")
excel.Visible = True
excel.Workbooks.Open g_excelfilename
objexcelapp.Workbooks.Worksheets("sheet1").Cells(4,3).Value=HMIRuntime.Tags("temprature").Read

excel.ActiveWorkbook.Save
objexcelapp.workbooks.close
objexcelapp.quit
Set objexcelapp=Nothing