我现在需要输出一个在线表格的数据,在线表格控件的名称为“表格视图_1”,画面名称为“鼓风机数据报表”。我在VBA脚本里面写了一个Excel_Output的函数,然后用一个按钮触发执行。函数代码如下:
Sub Excel_Output()
Dim objOnlineTable
Set objOnlineTable=HMIRuntime.Screens("鼓风机数据报表").ScreenItems("表格视图_1")
objOnlineTable.ExportDirectoryname="E:\桌面\报表数据"
objOnlineTable.ExportFilename="鼓风机数据报表1"
objOnlineTable.Export()
SetTag "Test",1
End Sub
但是现在按下按钮后,并没有任何文件生成。为了验证这个函数有没有被执行,我在后面写了一行测试代码。现在的结果是如果前面的代码被注释掉,则测试变量可以被赋值,如果前面的代码没有被注释,测试变量无法被赋值。看起来是代码执行到前面的代码时报错跳出了。
求助各位大神帮我看看问题出在什么地方,万分感谢!