VBA to SAP // RFC 功能模块，以表为输入参​​数

Question

我想通过 RFC 连接器将数据从 Excel 发送到 SAP。

对于RFC功能模块，我必须填写一个表格作为输入参数。 与 RFC 功能模块STFC_DEEP_TABLE 。

我的 VBA 代码在 with 语句处停止并出现错误：

“对象变量或未设置块变量”。

Sub RFC_DEEP_TABLE()
Dim sapConn As Object
Set sapConn = CreateObject("SAP.Functions")

If sapConn.Connection.Logon(0, False) <> True Then
    MsgBox "Cannot Log on to SAP"
End If

Dim objRfcFunc As Object
Set objRfcFunc = sapConn.Add("STFC_DEEP_TABLE")

With objRfcFunc
    .Exports.Item("IMPORT_TAB").value("STR") = "X" 'Objectvariable oder With-Blockvariable nicht festgelegt
End With

If objRfcFunc.Call = False Then
    MsgBox objRfcFunc.Exception
End If

End Sub

Answer 1

我无法对此进行测试，但是通过阅读 VBA/SAP Net Connector，您似乎类似于 C# 的 .Net Connector 语法，必须在设置字段值之前向导入表中添加一行。

Sub RFC_DEEP_TABLE()
  Dim sapConn As Object
  Set sapConn = CreateObject("SAP.Functions")

  If sapConn.Connection.Logon(0, False) <> True Then
    MsgBox "Cannot Log on to SAP"
  End If

  Dim objRfcFunc As Object
  Set objRfcFunc = sapConn.Add("STFC_DEEP_TABLE")

  Set import_tab = objRfcFunc.Tables("IMPORT_TAB")
  import_tab.freetable
  import_tab.appendrow
  import_tab.cell("STR", 1) = "X"

  If objRfcFunc.Call = False Then
    MsgBox objRfcFunc.Exception
  End If

End Sub

我不完全确定分配值的行， cell方法的参数应该是正确的，但我只发现了几个稍微矛盾的博客和论坛帖子，我不确定参数的顺序是否正确.

Answer 2

我遇到了同样的问题，我无法实例化 BAPI。 SAP 人员更改了 BAPI，我可以在不更改代码的情况下访问它。
BTW：参数顺序是：

 import_tab.cell(line#, fieldname) = "X"