如何使用VBA更改SAP脚本的文件保存路径?

时间:2019-06-25 13:03:30

标签: excel vba sap

我有一个保存在文件夹中的脚本,但是如果其他人想要使用我的代码,除了不知道如何修改路径之外,我想更改路径。

   objSess.FindById("wnd[0]").maximize
   [...]

      objSess.FindById("wnd[0]/usr/tabsTABSTRIP_TABBL1/tabpUCOM2/
     ssub%_SUBSCREEN_
     TABBL1:RFBILA00:0002/ctxtBILAVART").caretPosition = 1
     objSess.FindById("wnd[0]").sendVKey 4
     objSess.FindById("wnd[1]").Close
      objSess.FindById("wnd[0]/usr/tabsTABSTRIP_TABBL1/
      tabpUCOM2/ssub%_SUBSCREEN_TAB BL1:RFBILA00:0002/ctxtBILAVART").Text ="1"  
      objSess.FindById("wnd[0]/usr/tabsTABSTRIP_TABBL1/tabpUCOM2/
      ssub%_SUBSCREEN_TABBL1:RFBILA00:0002/ctxtBILASKAL").Text = "0/0"
      objSess.FindById("wnd[0]/usr/tabsTABSTRIP_TABBL1/tabpUCOM2/
      ssub%_SUBSCREEN_TABBL1:RFBILA00:0002/ctxtBILASKAL").SetFocus
     objSess.FindById("wnd[0]/usr/tabsTABSTRIP_TABBL1/tabpUCOM2/
     ssub%_SUBSCREEN_TABBL1:RFBILA00:0002/ctxtBILASKAL").caretPosition = 3
     objSess.FindById("wnd[0]/tbar[1]/btn[8]").Press
     objSess.FindById("wnd[0]/mbar/menu[0]/menu[3]/menu[2]").Select
     objSess.FindById("wnd[1]/tbar[0]/btn[0]").Press
     objSess.FindById("wnd[1]/usr/ctxtDY_FILENAME").Text = text.txt 
     objSess.FindById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 8
     objSess.FindById("wnd[1]/tbar[0]/btn[11]").Press

实际上,我找不到改变路径的行(我保存了脚本   本地)

1 个答案:

答案 0 :(得分:0)

如评论中所述,在SAP中记录宏时,要更改或至少单击要更改的每个字段至关重要。这样就记录了字段名称。

我对路径字段的有根据的猜测是:

objSess.FindById("wnd[1]/usr/ctxtDY_PATH").Text

我建议您再次记录该宏,因为根据SAP中的上下文,名称可能会略有不同,尤其是此时打开的窗口数可能会有所不同。

PS:.CaretPosition是从左到右的字母数,光标将位于文本字段中。