TL;DR ---------------
如果我在初始化脚本中正确声明了变量，则无法附加到 SAPFEWSELib.GuiApplication 的“连接”对象。MyApplication.Children(0) 集合是空的，但是如果我注释掉声明块，它就可以工作！？
TL;DR ---------------
我正在尝试在我的 SAP 客户端和我的 excel 应用程序之间建立更可靠的连接。
我当前的问题是建立连接。SAP 客户端在使用其脚本录制功能时提供了一个示例 vbscript。
If Not IsObject(MyApplication) Then
Debug.Print "yep"
Set SapGuiAuto = GetObject("SAPGUI")
Set MyApplication = SapGuiAuto.GetScriptingEngine
End If
If Not IsObject(Connection) Then
Set Connection = MyApplication.Children(0)
End If
If Not IsObject(session) Then
Set session = Connection.Children(0)
End If
关于stackoverflow的另一个问题接近回答了，但没达到stackoverflow.com/questions/24738998/vba-using-variables-that-were-not-declared
原始代码在这里，我稍微修改了一下，所以它可以在 excel/vba 中工作。（我放弃了 IsObject(Wscript)，我不得不用 MyApplication 替换 Application）
我要做的第一件事是显式声明所有变量。
使用我在以下地址 stackoverflow.com/questions/19783180/get-list-of-all-properties-for-an-object 获得的代码，我使用“TypeLib Information”和函数 TypeName() 来确定每个对象类型。我尝试声明如下
Dim session as GuiSession
Dim MyApplication as GuiApplication
Dim Connection as ISapConnectionTarget
Dim SapGuiAuto as object
我收到用户定义类型未定义错误。
经过一番搜索，我在这个地址找到了部分答案。
scn.sap.com/thread/3254335
我觉得手动添加“C:\Program Files (x86)\SAP\FrontEnd\SAPgui\sapfewse.ocx”引用会很容易中断。如果有更好的方法来做到这一点，请告诉我。
好的，现在我可以这样声明并且它有效。
Dim MyApplication As SAPFEWSELib.GuiApplication
Dim Connection As SAPFEWSELib.GuiConnection
Dim session As SAPFEWSELib.GuiSession
Dim SapGuiAuto As Object
我不喜欢 SapGuiAuto As Object，因为它并没有真正说明它是什么，而且我不能使用 CTRL+SPACE 来查看该对象的可用属性和功能（我现在不能没有的 VB 功能之一！）
关于这个对象，我只知道它有一个 .GetScriptingEngine 函数（方法？）。
在进行研究以编写此问题时，我在 sap.com 论坛上遇到了此线程。scn.sap.com/thread/3448120
这里提到“GetScriptingEngine 是 GuiApplication 类的方法”。
所以我尝试了以下声明，它似乎有效。
Dim MyApplication As SAPFEWSELib.GuiApplication
Dim Connection As SAPFEWSELib.GuiConnection
Dim session As SAPFEWSELib.GuiSession
Dim SapGuiAuto As SAPFEWSELib.GuiApplication
现在，如果我输入“会话”。出现可能的属性列表。但有个问题 ！
如果我输入以下行
Debug.Print session.FindById("wnd[0]").Text
它给出了一个错误（虽然它曾经工作得很好！）。错误是“对象变量或未设置块变量”。
如果我注释掉变量声明，它工作得很好！
在未声明会话时使用 TLI 函数我得到以下成员
DumpProperties session.FindById("wnd[0]")
在这里输出-> pastebin.mozilla.org/8882551
但是如果我在正确声明会话的情况下运行相同的命令，我会得到..同样的错误
因此，经过更多研究，事实证明脚本的开头现在不一样了。
If Not IsObject(MyApplication) Then
如果 MyApplication 已使用 Dim MyApplication As SAPFEWSELib.GuiApplication 声明，则不会执行
所以我尝试在没有 IF 的情况下执行命令。
Set MyApplication = SapGuiAuto.GetScriptingEngine
Set Connection = MyApplication.Children(0)
Set session = Connection.Children(0)
这将失败并在 Set MyApplication = SapGuiAuto.GetScriptingEngine 上出现“对象变量或未设置块变量”错误
这个问题的解决方案是像这样创建一个新的 SapGuiAuto 实例。
Set SapGuiAuto = New SAPFEWSELib.GuiApplication
现在执行上面的代码，直到它在 Set Connection = MyApplication.Children(0) 处失败
错误：“集合的枚举器找不到具有指定索引的元素”
对以下行的快速测试显示，.Children 集合是空的。
For Each chld In MyApplication.Children: Debug.Print "one exists": Next
如果我当前与 SAP 断开连接，这与我通常会遇到的错误相同，但我已连接并注释掉声明块，解决了问题。
关于stackoverflow的这个答案是不祥的stackoverflow.com/questions/36751819/sap-gui-scripting-error-the-enumerator-of-the-collection-cannot-find-an-elemen
我不是管理员，现在是星期五晚上 10 点，向 IT 询问任何事情都是一场噩梦。希望我不必诉诸于此。
我会在另一台电脑上试试。
刚试过，我得到了同样的东西。在这一点上，我必须认输，如果没有一些帮助或至少睡个好觉，我无法让它工作！
感谢您的任何建议或意见
我发现一些额外的链接对与我走同一条道路的人非常有用。
使用 VBA 调试器发现 SAP GUI 属性和函数 scn.sap.com/docs/DOC-39696
SAP GUI 脚本 API 文档（我无法打开这个文件，但里面有很多好东西）www.sdn.sap.com/irj/scn/go/portal/prtroot/docs/library/uuid/a034a16b-3bfe-2a10- e2bb-8bd880db0b3c
SAP GUI 脚本 API：如何自动化用户交互（不幸的是我的系统缺少“脚本开发工具”）scn.sap.com/docs/DOC-4614
BIBS 功能也可能对您有所帮助，但它不适用于我的系统 scn.sap.com/docs/DOC-4612