Bryan Domen
22/01/20, 20:45:03
Buen día, soy reciente usuario de SAP y no tengo mucha experiencia, verán he desarrollado el siguiente script:
If Not IsObject(application) Then
Set SapGuiAuto = GetObject("SAPGUI")
Set application = SapGuiAuto.GetScriptingEngine
End If
If Not IsObject(connection) Then
Set connection = application.Children(0)
End If
If Not IsObject(session) Then
Set session = connection.Children(0)
End If
If IsObject(WScript) Then
WScript.ConnectObject session, "on"
WScript.ConnectObject application, "on"
End If
session.findById("wnd[0]").maximize
session.findById("wnd[0]/tbar[0]/okcd").text = "zsd0107n"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "COMPLETO"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "bdoming1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 8
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"ZINSPFIM"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LAND1"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "ZINSPFIM"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "INSPECCIONES FINAL.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 18
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/okcd").text = "ZSD0104N"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "CURSOS"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 6
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "CURSO SEMESTRAL.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 15
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_WERKS-LOW").text = ""
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "202"
session.findById("wnd[0]/usr/ctxtS_WERKS-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_WERKS-LOW").caretPosition = 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "CURSO ANUAL.XLSX"
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/okcd").text = "ZSD0105N"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "OPERADORES"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 10
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "201"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "201.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "202"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2019"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 5
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "202.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "203"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2015"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "203.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "204"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2015"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "204.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "205"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "205.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "206"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "ZAPROV"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "206.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "UNIDADES"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 8
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "302"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "302.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "303"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "303.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "304"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "304.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "ICON"
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "305"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2019"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "305.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "306"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.01.2010"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "306.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "ACOPLADOS"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 9
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "401"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "NAME1"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 6
session.findById("wnd[1]").sendVKey 0
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "401.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "402"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "402.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "403"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "403.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "404"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "404.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "405"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "405.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "406"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "406.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "407"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "TXPARVW"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "407.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
Lo que busco son dos cosas, lo primero es que cuando se empieza a ejecutar el script, todos los libros que genera de excel los va abriendo (y como pueden ver son muchos), quiero ver la forma de que no los abra y solo los modifique.
Lo otro es que si es posible que este script lo ejecute una macro, mi idea es generar un botón en el formato que recopila toda la información generada el script y desde ahí, ejecutarlo.
If Not IsObject(application) Then
Set SapGuiAuto = GetObject("SAPGUI")
Set application = SapGuiAuto.GetScriptingEngine
End If
If Not IsObject(connection) Then
Set connection = application.Children(0)
End If
If Not IsObject(session) Then
Set session = connection.Children(0)
End If
If IsObject(WScript) Then
WScript.ConnectObject session, "on"
WScript.ConnectObject application, "on"
End If
session.findById("wnd[0]").maximize
session.findById("wnd[0]/tbar[0]/okcd").text = "zsd0107n"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "COMPLETO"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "bdoming1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 8
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"ZINSPFIM"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LAND1"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "ZINSPFIM"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "INSPECCIONES FINAL.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 18
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/okcd").text = "ZSD0104N"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "CURSOS"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 6
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "CURSO SEMESTRAL.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 15
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_WERKS-LOW").text = ""
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "202"
session.findById("wnd[0]/usr/ctxtS_WERKS-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_WERKS-LOW").caretPosition = 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "CURSO ANUAL.XLSX"
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/okcd").text = "ZSD0105N"
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "OPERADORES"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 10
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "201"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "201.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "202"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2019"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 5
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "202.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "203"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2015"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "203.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "204"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2015"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "204.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "205"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "205.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "206"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "ZAPROV"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "206.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "UNIDADES"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 8
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "302"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "302.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "303"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "303.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "304"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "304.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "ICON"
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "305"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.12.2019"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "305.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "306"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").text = "01.01.2010"
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_DATA-LOW").caretPosition = 10
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "306.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[1]/btn[17]").press
session.findById("wnd[1]/usr/txtV-LOW").text = "ACOPLADOS"
session.findById("wnd[1]/usr/txtENAME-LOW").text = "BDOMING1"
session.findById("wnd[1]/usr/txtV-LOW").caretPosition = 9
session.findById("wnd[1]/tbar[0]/btn[8]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "401"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "NAME1"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 6
session.findById("wnd[1]").sendVKey 0
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "401.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "402"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "402.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "403"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]").sendVKey 0
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "403.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "404"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "404.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "405"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "405.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "406"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "LIFNR"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "406.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").text = "407"
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").setFocus
session.findById("wnd[0]/usr/ctxtS_CODCAT-LOW").caretPosition = 3
session.findById("wnd[0]/tbar[1]/btn[8]").press
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").setCurrentCell -1,"Z_FIM_VIG"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").firstVisibleColumn = "TXPARVW"
session.findById("wnd[0]/usr/cntlGRID1/shellcont/shell/shellcont[1]/shell").selectColumn "Z_FIM_VIG"
session.findById("wnd[0]/tbar[1]/btn[40]").press
session.findById("wnd[0]/tbar[1]/btn[43]").press
session.findById("wnd[1]/usr/ctxtDY_PATH").text = "Y:\Proyecto Matriz de operadores\H&S"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").text = "407.XLSX"
session.findById("wnd[1]/usr/ctxtDY_FILENAME").caretPosition = 3
session.findById("wnd[1]/tbar[0]/btn[7]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
session.findById("wnd[0]/tbar[0]/btn[3]").press
Lo que busco son dos cosas, lo primero es que cuando se empieza a ejecutar el script, todos los libros que genera de excel los va abriendo (y como pueden ver son muchos), quiero ver la forma de que no los abra y solo los modifique.
Lo otro es que si es posible que este script lo ejecute una macro, mi idea es generar un botón en el formato que recopila toda la información generada el script y desde ahí, ejecutarlo.