Gestor de macros para CATIA V5 (II)

Al finalizar este tutorial para la creación de un gestor de macros para CATIA V5, habremos creado un formulario, que podrá ser lanzado desde cualquier módulo de CATIA, para acceder a todas aquellas utilidades que hayamos programado (o conseguido que nos programen) de una forma rápida y fácil.

Aunque está realizado para el entorno de CATIA, la programación está hecha en VBA por lo que puede servir para cualquier aplicación de Office de igual forma.

Este tutorial, lo publiqué ya hace unos años (en 2.014 nada menos, creo recordar…) en el foro de la web de Fernando Torrecilla, autor de, entre otros, El gran libro de CATIA. Ahora su web se llama torrecillacatia. Y ahora lo he rescatado, tras revisar alguna documentación que tenía por ahí, de la que ya, ni me acordaba.

Como me ha parecido interesante, he decidido publicarlo aquí de nuevo confiando en que sea de utilidad.

Esta es la segunda parte del tutorial completo.

Creación de la rutina principal

Ahora que ya hemos creado nuestra librería de macros, vamos a empezar a crear el gestor. Para ello, lo primero será crear la rutina principal que servirá para lanzarlo.

Para ello, vamos a abrir el editor de VBA. Podemos hacerlo a través de Tools – Macro – Macros y allí, estando nuestra librería seleccionada, clicar en el botón Create… o bien en Tools – Macro – Visual Basic Editor.

Hecho esto, se nos abre el editor que, si no tienes nada previo, no tiene nada más que el proyecto MisMacros visible en la ventana de exploración de proyectos (derecha del editor).

Sobre el proyecto MisMacros, pulsamos el botón derecho y seleccionamos Insertar – Modulo. Se nos abre la ventana de edición y ahí, es donde vamos a crear nuestra macro principal.

El código es el siguiente:

Sub CATMain()
        UF_MisMacros.Show
End Sub

Complicado, ¿no?.

La Sub CATMain()

Todas las macros de CATIA, estén en el lenguaje que estén, tienen un módulo principal que se debe llamar Sub CATMain(). Desde este se podrá hacer llamadas a otras subrutinas o funciones, pero debe existir CATMain, sí o sí.

Esta rutina, lo único que hace es lanzar el formulario, que yo he llamado UF_MisMacros (UF de UserForm, para saber lo que es) mediante el método show.

De momento, no tenemos nada, pero hemos hecho la primera rutina en VBA, que tampoco es poco. Ahora vamos a dejarla bonita, creando el UserForm.

Creación de UserForm

El siguiente paso, será crear el UF, que vamos a llamar, como hemos visto más arriba, UF_MisMacros.

Para ello, seguimos el mismo procedimiento que para crear el módulo, pero esta vez insertando un UserForm: nos ponemos sobre el proyecto, damos botón derecho y elegimos Insertar – UserForm.

Debajo del explorador de proyectos, veremos la ventana de propiedades. En ella se pueden ver y modificar las propiedades del objeto que seleccionemos en cada momento.

Con el UserForm seleccionado (si no lo tenemos, hacemos doble click en el árbol del proyecto, sobre él), en la primera propiedad (Name) ponemos UF_MisMacros, que es como nos vamos a referir, a partir de ahora, a este UF.

En la propiedad Caption, ponemos el texto que queremos que nos muestre en la barra superior cuando esté visible y, en ShowModal, elegimos False. Esta propiedad es importante en los UF ya que condiciona el funcionamiento de los mismos.

Un UF definido como modal, al mostrarse, bloqueará cualquier otro tipo de interacción con la aplicación de la que procede, en este caso CATIA. En cambio, establecido como “no modal”, lo podemos tener visible en todo momento, y seguir trabajando en CATIA. Está bien, eh?.

Yo, le he puesto el color de los usados por CATIA para mimetizarme con el entorno. Esto se hace en la propiedad del UF BackColor.

Insertando los controles necesarios

Pues ahora vamos a darle forma insertando unos cuantos controles. Insertaremos:

• Un control tipo label para el título del cuadro de lista de macros
• Un control de tipo cuadro de lista, donde podremos ver las macros disponibles para ser ejecutadas
• Un control de tipo label, donde veremos el texto explicativo de para qué sirve la macro que tengamos seleccionada
• Un botón para lanzar la ejecución de la macro que seleccionemos
• Un botón para salir

Las propiedades asignadas a cada control son:

Label de título Macros disponibles:

• Name:                    Label1
• Caption:                Macros disponibles
• Font:                      La que más os guste, negrita (que quepa en la pantalla)

Label de texto de ayuda:

• Name:                    LblTip
• Caption:                Aquí se muestra la descripción de la macro seleccionada
• Font:                      La que más os guste, no excesivamente grande. Yo, además, le he dado altura como para que                   me quepan dos líneas de texto

Lista de macros:

• Name:                    ListBoxMacros
• Multiselect:          0 – fmMultiSelectSingle (para poder seleccionar solo un macro cada vez)

Botón de ejecutar:

• Name:                    Ejecutar
• Caption:                Ejecutar macro
• Enabled:                False

Botón de salir:

• Name:                    Cerrar
• Caption:                Salir

Ahora solo nos falta crear el código ligado a cada posible evento del formulario.

Pero esta es tarea para el próximo capítulo.

Haz click en uno de los enlaces siguientes para ver mas sobre la creación de un gestor de macros para CATIA V5:

Si quieres ver la parte I / Si quieres ver la parte III