Un objeto UserForm es una ventana o cuadro de diálogo que forma parte de la interfaz de usuario de una aplicación.
UserForm le permite crear ventanas o cuadros de diálogo en su proyecto. En el formulario, dibuja y puede ver los controles.
Los formularios de usuario tienen propiedades que definen su apariencia, como la posición, el tamaño, el color y aspectos de su comportamiento.
Al desarrollar el formulario:
Para agregar UserForm necesitamos hacer lo mismo cuando agregamos un nuevo módulo:
Después de eso, aparecerá el formulario (UserForm) y la barra de herramientas (Toolbox):
Si no ve la ventana Propiedades (Properties), asegúrese de que se muestre y luego comience editando el nombre UserForm (para que pueda encontrarlo fácilmente más adelante):
Un formulario (UserForm) tiene sus propios eventos, al igual que un libro de trabajo o una hoja. Para agregar un evento, haga doble clic en UserForm.
Ahora vamos a crear dos eventos para ver cómo funciona esto. El primer evento establecerá el tamaño inicial de UserForm y el segundo aumentará su tamaño en 50 px cuando el usuario haga clic.
El evento UserForm_Initialize se activará cuando se inicie UserForm:
Private Sub UserForm_Initialize()
my_userform.Height = 100
my_userform.Width = 100
End Sub
Para simplificar el código, podemos usar Me en lugar del nombre UserForm (porque este código está en el UserForm con el que estamos trabajando):
Private Sub UserForm_Initialize()
Me.Height = 100
Me.Width = 100
End Sub
El segundo evento ocurrirá cuando el usuario haga clic en UserForm:
Private Sub UserForm_Initialize()
Me.Height = 100
Me.Width = 100
End Sub
Private Sub UserForm_Click()
Me.Height = Me.Height + 50
Me.Width = Me.Width + 50
End Sub
Para ejecutar UserForm en un procedimiento, use Mostrar:
Sub show_userform()
my_userform.Show
End Sub