点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

嗨，您将看到以下程序创建了一个简单的BA，但是当包含额外的代码行以容纳excel电子表格以进行批量BA创建时，实际上将电子表格锁定为只读状态，这阻止了脚本运行。 请帮忙。 谢谢

如果不是IsObject（application），则设置SapGuiAuto = GetObject（" SAPGUI"）如果不是IsObject（connection），则设置应用程序= SapGuiAuto.GetScriptingEngine结束。如果不是IsObject（session），则设置连接= application.Children（0）结束 ）然后设置session = connection.Children（0）如果If IsObject（WScript），则结束；然后WScript.ConnectObject会话，"在" WScript.ConnectObject应用程序上，" on"；如果，session.findById（" wnd [0]"）。maximize 昏暗的objExcel，objWorkbook，objSheet，我设置objExcel = CreateObject（" Excel.Application"）设置objWorkbook = objExcel.Workbooks.Open（" C：\ Users \ TSK \ Documents \ BA06.xlsx"）设置objSheet = objWorkbook.Sheets（ " Sheet1"）对于i = 2到objSheet.UsedRange.Rows.Count业务= Trim（CStr（objSheet.Cells（i，1）.Value））'Column1名称= Trim（CStr（objSheet.Cells（i，2） .Value））'Column2 session.findById（" wnd [0]/tbar [0]/okcd"）。text =" ox03" session.findById（" wnd [0]"）。sendVKey 0 session.findById（" wnd [0]/tbar [1]/btn [5]"）。press session.findById（" wnd [0]/usr/tblSAPL0ORGCORETCTRL_V_TGSB/txtV_T GSB-GSBER [0,0]"）。text =业务session.findById（" wnd [0]/usr/tblSAPL0ORGCORETCTRL_V_TGSB/txtV_TGSB-GTEXT [1,0]"）。text =名称session.findById（" wnd [0 ]/usr/tblSAPL0ORGCORETCTRL_V_TGSB/txtV_TGSB-GTEXT [1,0]"）。setFocus session.findById（" wnd [0]/usr/tblSAPL0ORGCORETCTRL_V_TGSB/txtV_TGSB-GTEXT [1,0]"）。caretPosition = 19 session.findById " wnd [0]/tbar [0]/btn [11]"）。按下一个msgbox" BA已创建"