如何从SAP复制数据并将其粘贴到带有VBA的Excel上?

时间:2019-08-22 20:23:29

标签: excel vba sap sap-gui

我正在尝试使工作中的某些流程自动化,并且我们只有Excel可以使用,因此为什么我需要使用VBA。我正在尝试在Excel的N列下的单元格中复制变灰(不可编辑)区域的内容。

我得到了错误:

  

通过ID找不到控件

这是VBA代码(我使用SAP中的脚本记录功能来获取它,并改写了Excel部分):

Dim SapGuiAuto As Object
Dim application As Object 'SAPFEWSELib.GuiApplication
Dim connection As Object  'SAPFEWSELib.GuiConnection
Dim session As Object     'SAPFEWSELib.GuiSession

Set SapGuiAuto = GetObject("SAPGUI")
Set application = SapGuiAuto.GetScriptingEngine
Set connection = application.Children(0)
Set session = connection.Children(0)

Sheets("Macro Test").Select
Row = Range("B1").Value

session.findById("wnd[0]").maximize
session.findById("wnd[0]/usr/lbl[0,11]").SetFocus
Material = session.findById("wnd[0]/usr/ssubSTLKOPF:SAPLCSDI:0802/ctxtRC29K-MATNR").Text
    Sheets("Data").Select
    Range("N" & Row).Select
    Selection.Value = Material
    Sheets("Macro Test").Select

0 个答案:

没有答案