VBS Excel单元格到SAP

时间:2017-09-12 06:53:36

标签: excel vba scripting sap

我很难通过vbs脚本从Excel工作表中获取正确的信息到SAP。

单个单元格工作正常,将被添加到SAP中,但原始Excel工作表包含一个单元格,其中需要删除最后4位数字,然后与另一个单元格合并,然后添加到SAP。

这对我有用:

session.findById("wnd[0]/usr/tabsTABSPR1/tabpSP06/ssubTABFRA1:SAPLMGMM:2000/subSUB5:SAPLZMM_GINCOFIELDS:5802/ctxtMARC-PRCTR").text = (objSheet.Cells(6,"P") & (objSheet.Cells(38,"P")).Value)

但是这不要:

session.findById("wnd[0]/usr/subSUBSCR_BEWERT:SAPLCTMS:5000/tabsTABSTRIP_CHAR/tabpTAB1/ssubTABSTRIP_CHAR_GR:SAPLCTMS:5100/tblSAPLCTMSCHARS_S/ctxtRCTMS-MWERT[1,1]").text = (objSheet.Cells(40,"F") & (Left((40,"F"), Len(40,"F") - 4)) & (objSheet.Cells(39,"L") & (objSheet.Cells(39,"O").Value)   

启动脚本时的错误消息意味着翻译:...在207')' excpected ...

提前感谢您查看此内容并提供帮助或提示。

1 个答案:

答案 0 :(得分:0)

您正在使用objSheet.Cells(40, "F"):我怀疑您的实际含义是Len。与您的Len(objSheet.Cells(40, "F"))电话相同,我怀疑您真正想要的是:Left(objSheet.Cells(40, "F"), Len(objSheet.Cells(40, "F")) - 4) & objSheet.Cells(39, "L") & objSheet.Cells(39, "O") 。所以把它放在一起:

{{1}}