Mi primer UserForm

Un UserForm es un formulario de usuario. ¿Y qué es un formulario de usuario?. Pues un objeto que se nos presenta en pantalla, como puede serlo una ventana emergente, un Inputbox, un Msgbox, etc., y que tiene como finalidad preguntarnos algo o mostrarnos alguna información. El usuario debe interactuar con ese formulario, normalmente pulsando algún botón, el de aceptar, rechazar, o cualquier otro que el programador haya incluido en el mismo.

Para incluir un UserForm, deberemos acceder al modo VBA (Alt+F11), y seleccionaremos en el menú Insertar la opción UserForm.

De esa forma obtendremos algo como esto:


Una vez hecho eso, podemos cambiarle el nombre al UserForm, porque por defecto nos habrá salido este nombre: UserForm1 (siempre y cuando sea el primer UserForm que hemos creado en el libro). Para cambiar el nombre, seleccionaremos en Propiedades (ver parte inferior izquierda de la imagen anterior), la propiedad Name, y donde pone UserForm1, le pondremos el nombre que deseemos, pero si es un nombre compuesto, deberá ir sin espacios (podemos usar el guión bajo por ejemplo).

En la imagen anterior podéis ver también el Cuadro de herramientas flotante. Podremos introducir texto, desplegables, imágenes, botones, y cualquier otro elemento que aparece en esa ventana flotante.

Vamos a hacer algo como esto:


Para introducir el texto que aparece en la imagen, deberemos seleccionar el botón con la A mayúsculas llamado Etiqueta (al acercar el puntero del ratón nos aparece el nombre), y que figura en el Cuadro de herramientas. Para cambiar el tamaño de la letra mostrada en el UserForm, una vez introducido el texto, debéis seleccionar la propiedad Font, …desde ahí podréis cambiar el tipo de letra y el tamaño. Para introducir el botón al que le hemos puesto el texto de Aceptar, seleccionaremos en el Cuadro de herramientas el botón llamado Botón de comando. Desde las propiedades del botón (ver la ventana llama precisamente así, Propiedades), y con el botón seleccionado, elegiremos la propiedad Caption, y a la derecha, donde pone CommandButton1, pondremos Aceptar, o cualquier otro texto que deseemos.

Ahora solo nos queda por ver como funciona el UserForm, para lo cual pulsaremos el botón que aparece debajo de las opciones de menú, llamado Ejecutar macro (el botón con la flecha azul).

Antes de guardar nuestro fichero de Excel, vamos a hacer un par de cosillas más. Pulsaremos el botón Aceptar que hemos creado, y nos aparecerá una pantalla como esta:


En esa pantalla que nos aparece, introduciremos este código:

Private Sub CommandButton1_Click() 'Ocultamos el formulario. 'Si le hemos cambiado el nombre, en lugar 'de UserForm1, le pondremos el que tenga. UserForm1.Hide End Sub

Ahora, si por ejemplo, queremos que cada vez que al abrir el fichero de Excel, se nos presente ese formulario, deberemos incluir este código en un módulo:

Sub auto_open() 'Llamamos al UserForm. 'Si le hemos cambiado el nombre, en lugar 'de UserForm1, le pondremos el que tenga. UserForm1.Show End sub

Para verlo funcionar, grabaremos el fichero, y lo cerraremos. Seguidamente abriremos de nuevo el fichero y nos aparecerá en pantalla el formulario (show). Si pulsamos sobre el botón de aceptar, se ocultará el UserForm (hide).