Sub 自动登录SAP()
Shell ("C:\Program Files (x86)\SAP\FrontEnd\SAPgui\sapshcut.exe" & " -system=" & "S4P" & " -client=" & "800" & " -user=" & "账号" & " -pw=" & "密码" & " -language=" & "ZH")
Application.Wait (Now() + TimeValue("00:00:2"))
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{UP}", True
SendKeys "{ENTER}", True
End Sub
用excel vba写一个自动登录sap
最新推荐文章于 2024-07-11 12:23:28 发布