Question

SAP的新手，但是已经完成了一些VBA编程。

我需要使用Excel VBA自动化SAP中的某些操作，但是我从婴儿步入手，陷入困境。

我要做的就是将数据从SAP中的列（已打开的表）复制到数组中。听起来很简单。但是，它起步很好，但从未正确完成。我有一个具有306行的表。它一直停留在85、127和178。不确定这些值是否有意义。更令我困惑的是为什么它返回0000000127的值？我一直在寻找答案几个小时。运行SAP Complex和Excel2013。也无法找到SAPfewse.ocx。我已经在VBA开发人员窗口中启用了几乎所有引用。任何帮助/想法将不胜感激！我希望这很明显。

Set Table = Session.FindById("wnd[0]/usr/cntlDISASSEMBLY_ALV/shellcont/shell")
Dim rows As Long
Dim arrRow() As Variant
Dim colName As String
Dim rowCount As Double

rows = Table.rowCount - 1

ReDim arrRow(rows)

colName = "ZZMRO_CHA"

For j = 0 To rows
    arrRow(j) = Table.GetCellValue(j, colName)
Next

Array watch output - "completed" loop

Answer 1

您可以尝试以下操作：

...
 For j = 0 To rows 
        arrRow(j) = Table.GetCellValue(j, colName) 
        If j Mod 32 = 0 Then    Table.currentCellRow = j
  Next 
  ...

关于ScriptMan

For循环未捕获SAP中的所有值

1 个答案: