Public Sub get_data(itabtable As Object) Dim vField As Variant Static j As Integer For j = 1 To itabtable.RowCount ThisWorkbook.Sheets(4).Cells(j, 4) = itabtable.Value(j, "GNAME" ThisWorkbook.Sheets(4).Cells(j, 5) = itabtable.Value(j, "GUSR" ThisWorkbook.Sheets(4).Cells(j, 6) = itabtable.Value(j, "GUSRVB" NextEnd Sub
我是准备调用SAP里的function,该function返回值为internal table,我需要get这些值到excel中再做处理.
已经try出如何用VBA读取SAP中的Database table中的数据并保存到excel中了,internal table还需要继续测试.
楼主,好想知道你是怎么做到的,共享一下经验吧