MUNDOSAP

Regresar   MUNDOSAP > CONSULTORIA > CONSULTORIA GENERAL
Nombre de Usuario
Contraseña
Home Descargas Registrar FAQ Miembros Calendario Buscar Temas de Hoy Marcar Foros Como Leídos




 
Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Viejo 22/01/20, 20:45:03
Bryan Domen Bryan Domen is offline
Junior Member
 
Fecha de Ingreso: ene 2020
Mensajes: 3
Question Script SAP-Excel

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.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Reglas de Mensajes
no puedes crear nuevos temas
no puedes responder temas
no puedes adjuntar archivos
no puedes editar tus mensajes

El código vB está On
Las caritas están On
Código [IMG] está On
Código HTML está Off
Saltar a Foro


Husos Horarios son GMT. La hora en este momento es 06:12:35.


www.mundosap.com 2006 - Spain
software crm, crm on demand, software call center, crm act, crm solutions, crm gratis, crm web