Anónimo
Poner contraseña a UserForm
Tengo un botón en mi hoja de excel que me abre un UserForm
Private Sub CommandButton5_Click()
UserForm1.Show
End Sub
Lo que quiero, es saber si es posible poner contraseña a ese UserForm y cada vez que lo mande llamar con el botón, me la pregunten.
(Esto con el fin de que no cualquier usuario pueda accesar al UserForm)
Muchas gracias por su ayuda.
Private Sub CommandButton5_Click()
UserForm1.Show
End Sub
Lo que quiero, es saber si es posible poner contraseña a ese UserForm y cada vez que lo mande llamar con el botón, me la pregunten.
(Esto con el fin de que no cualquier usuario pueda accesar al UserForm)
Muchas gracias por su ayuda.
1 respuesta
Respuesta de bacter582
1
Como estas amigo, con esto puedes solucionar tu problema
Private Sub CommandButton5_Click()
dim clave as string
clave = InputBox("Introduzca clave")
If clave = "tuclave" Then
UserForm1.Show
Else
msgbox "clave invalida"
End If
End Sub
Private Sub CommandButton5_Click()
dim clave as string
clave = InputBox("Introduzca clave")
If clave = "tuclave" Then
UserForm1.Show
Else
msgbox "clave invalida"
End If
End Sub