Я использую следующие строки кода для подключения VBA к сеансу графического интерфейса SAP, и он работает хорошо:
Sub Change_date()
Dim SapGuiAuto
Dim SetApp
Dim Connection
Dim Session
Set SapGuiAuto = GetObject("SAPGUI")
Set SetApp = SapGuiAuto.GetScriptingEngine
Set Connection = SetApp.Children(0)
Set Session = Connection.Children(0)
'And so on.
Однако это не работает в графическом интерфейсе SAP внутри SAP NetWeaver Business Client 5.
SAP GUI: ![SAP GUI](https://i.stack.imgur.com/mfDYb.png)
SAP GUI внутри SAP NW Business Client 5: ![SAP GUI inside SAP NW Business Client 5](https://i.stack.imgur.com/itVJC.png)
Как изменитькод, подходящий для SAP GUI и для бизнес-клиента SAP NW?