vba - 如何通过VBA选择SAP系统

我已经研究了整个Internet，但没有找到类似的东西。

我正在编写VBA程序，该程序将从SAP提取数据到Excel，一切顺利。我想使整个过程自动化并通过VBA打开Sap Logon没问题，但是在我们公司中有很多基于SAP的系统，因此在打开SAP Logon和授权之间有一个窗口，我应该在其中选择服务器（屏幕截图）。您知道我如何通过VBA自动选择服务器吗？


非常值得关注。

最佳答案

我使用下面的代码选择SAP系统。

Sub Choose_SAP(system_SAP As String, userSAP As String, passwordSAP As String)

     Dim APP As Variant
     Dim SapGuiAuto As Variant
     Dim Connection As Variant
     Dim session As Variant

     Set SapGuiAuto = GetObject("SAPGUI")

     Set APP = SapGuiAuto.GetScriptingEngine

     Set Connection = APP.OpenConnection(system_SAP , True)

     Set session = Connection.Children(0)

     session.FindById("wnd[0]").maximize
     session.FindById("wnd[0]/usr/txtRSYST-BNAME").Text = userSAP
     session.FindById("wnd[0]/usr/pwdRSYST-BCODE").Text = passwordSAP
     session.FindById("wnd[0]/tbar[0]/btn[0]").press
End Sub

希望这对您有用！

关于vba - 如何通过VBA选择SAP系统，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/46830294/