Habilitar botón de Formulario al escribir en un TextBox en Excel vba

Para este artículo / video les mostraré una macro de Excel usada en un formulario que nos habilitará un botón para ejecutar otra macro, siempre y cuando hayamos ingresado un texto en un control de tipo TextBox.
Objetivo
La finalidad de dicha macro es evitar que se ejecute una macro si no hemos ingresado algún texto. Los usos que le podemos dar a la macro son los siguientes:
-
Evitar que se guarden valores vacío en alguna tabla o base de datos.
-
No continuar con algún proceso habiendo valores en blanco.
-
Ahorrarnos los mensajes de aviso, sino simplemente no poder presionar el botón.

Figura 1. En animación veremos cómo se habilita el botón Mostrar sólo cuando ingresamos un texto en la Caja de texto.
Código de la macro vba
Ubicación: UserForm2
'--------------------------------------------------------------------------------------- ' Module : UserForm2 ' Author : scampos ' Date : 10/12/2015 ' Web : https://www.exceleinfo.com ' Youtube : https://www.youtube.com/user/sergioacamposh '--------------------------------------------------------------------------------------- ' 'Con el evento Click se ejecutará un MsgBox mostrando el valor 'del TextBox ' Private Sub btnMostrar_Click() MsgBox Me.txtNombre.Value End Sub ' 'Al lanzarse el evento Change se analizará si el valor del TextBox es vacío. 'Si el valor no es vacío entonces el botón se habilitará. ' Private Sub txtNombre_Change() If Me.txtNombre.Value <> "" Then Me.btnMostrar.Enabled = True Else Me.btnMostrar.Enabled = False End If End Sub
En La exposicion no mencionas que en las propiedades del Botón tien que colocar la Enabled en False
Tienes razón. Gracias por la anotación.
Me di cuenta al copi-pega del codigo y el boton ya aparecia true al abrir el form.
Sin importancia, todos nos equivocamos, Dios se equivoco a nombrar el diablo para su dicipulo