VBS Excel单元格到SAP

问题描述:

我很努力地从Excel表单通过vbs脚本将正确的信息导入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 ...

先谢谢你看看这个,并提供帮助或提示。

+0

我想我找到了失踪“)”,但现在我得到的运行时错误: 类型的冲突:“[字符串:‘F’]” 用下面的代码: (objSheet 。细胞(40,“F”(左(40,“F”),莱恩(40,“F”) - 4))&(objSheet.Cells(39,“L”)&(objSheet.Cells(39, “O”)))。Value) –

您正在使用Left(40,"F"):我怀疑你的意思是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") 
+0

非常感谢Zac ...那就是我一直在寻找的东西。 太棒了! –

+0

如果答案有帮助,请不要忘记接受它。这样它就从未应答的队列中取出 – Zac