如何从打开的 SAP 会话中获取用户 ID？

Question

我需要将用户 ID 获取到 VBA 代码中。

喜欢图片：

我试过了

UserId = Session.FindById("wnd[0]").User

但是失败了。正确的方法是什么？

Answer 1

事实证明这很容易：

Sub Getuser()



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)

Session.FindById("wnd[0]").Maximize
Session.FindById("wnd[0]/mbar/menu[4]/menu[11]").Select

MsgBox Session.FindById("wnd[1]/usr/txtSYST-UNAME").Text
Session.FindById("wnd[1]/tbar[0]/btn[0]").Press

End Sub

Answer 2

更简单的是：

UserId = Session.Info.User

如何从打开的 SAP 会话中获取用户 ID？

How to get user ID from an open SAP session?

excel

sap

vba