Contraseña en botón de userform.

Tengo un excel en el cual tengo Application.Visible = False en el Workbook_Open()

Y necesito que al presionar un botón en un Userform me pida una contraseña y

Si esta es correcta el Application. Visible sea igual a True para poder ver el libro.

¿Es esto posible?

1 respuesta

Respuesta
1

En el userform pon un textbox y commandbutton

El código en el botón es:

Private Sub CommandButton1_Click()
    If TextBox1.Value = "hola" Then
        Application.Visible = True
    Else
        MsgBox "Contraseña errónea"
    End If
End Sub

Puedes cambiar en las propiedades del textbox PasswordChar y poner un asterisco *

Para que de esa forma cuando captures en el textbox aparezcan asteriscos


.

.

¡Gracias! 

Funciono a la perfección.

Saludos

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas