Dim objExcelApp,objExcelBook
Dim patch
Set objExcelApp = CreateObject("Excel.Application")
patch="d:\1237.xlsx"
objExcelApp.Visible = TrUE
objExcelApp.Workbooks.Open patch
同样的代码，换台电脑怎么不能用了，其他地方还需要设置么？
最佳答案
将脚本复制到按钮的点击事件中调试，成功之后加入到动作中，如果使用动作，那么还需要在运行系统中勾选”全局脚本运行系统“
脚本调试方法：
在画面上放置脚本诊断窗口，智能对象->应用程序窗口->全局脚本->GSC Diagnostics
在代码中使用HmiRuntime.Trace "OutputInfo"输出信息调试，多加几行，看哪一行未执行则可以证明在这一行之上的代码执行有误。如果脚本运行出错，那么脚本不会执行剩下未执行的代码，如果需要脚本执行剩下的代码，那么需要在代码中加入On Error Resume Next
WinCC跟我做：WinCC 脚本调试与诊断方法
http://www.ad.siemens.com.cn/service/elearning/cn/Course.aspx?CourseID=859
提问者对于答案的评价：
运行后说是 ActiveX部件不能创建对象:‘Excel.Application’
原创文章，作者：ximenziask，如若转载，请注明出处：https://www.zhaoplc.com/plc356586.html
微信扫一扫 
支付宝扫一扫 