再请教:

通过事件触发 将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