Hoy quiero publicar una pequeña entrada, a modo de píldora formativa, de cómo se puede desactivar el botón de cerrado de un userform.
Muchas veces, cuando confeccionamos aplicaciones nos interesa que el usuario salga de las mismas pulsando un determinado botón y no cerrando la ventana de formulario directamente. Esto lo conseguiremos introduciendo un código específico en el userform:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = 0 Then Cancel = True
End Sub
En el momento que lo apliquemos, el userform no se podrá cerrar desde el botón habitual:
Con ejemplo de la imagen, podemos ver claramente como ahora debemos pulsar el botón que pone «CERRAR» para salir del formulario y no hacerlo pulsando la X.
Adicionalmente he añadido código para que al abrir el archivo de Excel automáticamente se genere el form, se debe colocar en el módulo Thisworkbook:
Private Sub Workbook_Open()
UserForm1.Show
End Sub
También para salir del formulario pulsando en el botón «CERRAR», debemos colocar el siguiente código dentro del userform:
Private Sub CommandButton1_Click()
UserForm1.Hide
End Sub
Y este ha sido el pequeño post de hoy, un sencillo truco para facilitar nuestros procesos 🙂
Descarga el archivo de ejemplo pulsando en: DESACTIVAR BOTÓN DE CERRAR EN UN USERFORM
Es excelente lo busque y daban tanto código que me hacia bolas pero aquí es fácil
que bueno me ayudo mucho, y ahora le consulto como hago ejecutable mi proyecto sin que aparesca las hojas de excel
Puedes ocultar las hojas para dar un aspecto más profesional, pero no será un exe
Hola. Esta muy bueno. Quisiera saber si se puede hacer desaparecer la barra de título de un formulario creado con VBA de Excel