Seleccionar un layout en una lista con SAP GUI Scripting

Sélection Layout Grid SAP GUI Scripting

Después de hacer clic en “Select layout”, solo tienes que hacer clic derecho en la columna izquierda de la lista, elegir Search y escribir el nombre del layout. Con eso ya seleccionas un layout en una lista SAP.

Hay dos formas de automatizar esta selección:

  • 1) grabar tu macro incluyendo los pasos descritos en la parte I,
  • o 2) si la macro ya está grabada, añadir el bloque de código que se muestra en la parte II.

I – Pasos que añadir mientras grabas una macro para seleccionar un layout en una lista

  1. Después de hacer clic en “choose layout”, haz clic derecho en la columna izquierda de la lista, como se muestra a continuación:

Sélectionner un layout dans une liste

 

Seleccionar un layout en una lista

  1. Obtendrás la siguiente ventana:

 

Ventana de búsqueda del layout

  1. Introduce en el campo “Search Term” el nombre del layout que quieres seleccionar y luego valida:

 

Se ha encontrado 1 layout

  1. El layout ya está seleccionado. Cierra la ventana haciendo clic en la cruz roja para volver a la lista anterior:

  1. El cursor ha aparecido sobre el layout que has seleccionado, valida y listo
  2. Una vez que hayas exportado tu tabla, puedes integrarla directamente en un archivo de Excel haciendo lo siguiente:

Plantilla para integrar fácilmente tu tabla SAP en Excel
  1. Una vez que tu tabla esté integrada en Excel, envíala por correo electrónico a tus colaboradores; te explicamos 4 métodos muy sencillos y eficaces para hacerlo.

II – Código que añadir a la macro si ya has grabado tu macro y no quieres grabarla una segunda vez

  1. Haz clic derecho en tu archivo de script .vbs y ábrelo con el Bloc de notas
  2. Inserta en tu script el siguiente bloque de código:
objSess.FindById("wnd[0]/tbar[1]/btn[33]").Press 'correspond au clic sur le bouton "select layout"
objSess.FindById("wnd[1]/usr/ssubD0500_SUBSCREEN:SAPLSLVC_DIALOG:0501/cntlG51_CONTAINER/shellcont/shell").CurrentCellRow = -1
objSess.FindById("wnd[1]/usr/ssubD0500_SUBSCREEN:SAPLSLVC_DIALOG:0501/cntlG51_CONTAINER/shellcont/shell").SelectColumn "VARIANT"
objSess.FindById("wnd[1]/usr/ssubD0500_SUBSCREEN:SAPLSLVC_DIALOG:0501/cntlG51_CONTAINER/shellcont/shell").ContextMenu
objSess.FindById("wnd[1]/usr/ssubD0500_SUBSCREEN:SAPLSLVC_DIALOG:0501/cntlG51_CONTAINER/shellcont/shell").SelectContextMenuItem "&FIND"
objSess.FindById("wnd[2]/usr/txtGS_SEARCH-VALUE").Text = "/FR_CUT_REPO" 'indiquer ici entre guillements le nom du layout
objSess.FindById("wnd[2]/usr/txtGS_SEARCH-VALUE").CaretPosition = 12
objSess.FindById("wnd[2]/tbar[0]/btn[0]").Press

Artículos relacionados