[求助]WinCC和Excel交换数据

Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y)
Dim objExcelApp
Set objExcelApp = CreateObject("Excel.Application")
objExcelApp.Visible = True
ObjExcelApp.Workbooks.Open"c:\Documents and Settings\zhongguoliang\My Documents\ExcellExample.xls"
objExcelApp.Cells(4,3).Value = ScreenItems("IOField1").OutputValue
objExcelApp.ActiveWorkbooks.Close
objExcelApp.Quit
Set objExcelApp = Nothing
End Sub

objExcelApp.Cells(4,3).Value = ScreenItems("IOField1").OutputValue是啥意思?
能在表格中看到IOField1中的数据吗?

怎么只见Excel闪了一下而没将值写到表格中.

好了,解决了.