您可以使用 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 = ... 阅读更多