您可以使用 VBA 從 SAP 中提取資料。如果您線上搜尋，可以找到很多部落格。簡而言之，這取決於您對 SAP 系統的訪問級別。我過去做過類似的事情。它是這樣工作的：我有一個現有的 RFC 可以為我提取所需的資料，並且我有一個 ABAP 程式來提取部分資料。然後我將使用宏來呼叫相應的 RFC 和程式來完成它們的工作。

如果您正在使用 SendKeys，請避免使用它。我在過去的專案中使用過它，它似乎不一致且容易出錯。您可以在模組頂部使用下面的程式碼段，並在需要的地方呼叫它。Option Explicit Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal _bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Const KEYEVENTF_KEYUP = &H2 Private Const VK_SNAPSHOT = &H2C Private Const VK_MENU = &H12 Sub PrintScreen() keybd_event VK_SNAPSHOT, 1, 0, 0 End Sub

您可以編寫一個 ABAP 程式來從 SAP 匯出資料，然後使用宏可以呼叫的遠端函式呼叫來提取資料。此外，如果符合要求，您也可以選擇自己建立檔案。您也可以選擇 SAP GUI 指令碼作為替代方案。指令碼框架允許您自動化 Windows 和 Java 的介面。它可以讓你執行很多活動。指令碼 API 為你提供了大量的可指令碼化物件，它們包裝了 SAP GUI 物件。您可以從宏中使用這些物件。SAP GUI ... 閱讀更多

請嘗試使用以下指令碼 −Dim sapConn As Object \宣告連線物件 Set sapConn = CreateObject("SAP.Functions") \建立 ActiveX 物件 sapConn.Connection.user = "使用者名稱" sapConn.Connection.Password = "xxxx" sapConn.Connection.client = "客戶端號" sapConn.Connection.ApplicationServer = "應用伺服器” sapConn.Connection.Language = "PT" If sapConn.Connection.Logon(0, True) True Then //在此處檢查連線 MsgBox "無法登入到 SAP" Else MsgBox "登入成功！！" End If Dim rfcAcctDocCheck As Object Dim oAcctHeader As Object Dim otAcctAR, otAcctGL, otAcctAP, otAcctAMT, otReturn As Object Set rfcAcctDocCheck = sapConn.Add("BAPI_ACC_DOCUMENT_CHECK") Set oAcctHeader = rfcAcctDocCheck.Exports("DOCUMENTHEADER") Set otAcctGL = rfcAcctDocCheck.Tables("ACCOUNTGL") Set otAcctAR = rfcAcctDocCheck.Tables("ACCOUNTRECEIVABLE") Set otAcctAP = ... 閱讀更多