Error en código para Password al abrir formulario
He creado una contraseña con el siguiente código. Lo que me sucede es que cuando la. Contrsseña es incorrecta me muestra un error. ¿Hay algo que deba añadir a mi código? Gracias
Dim MyPass As String
Dim TuPass As String
MyPass="clavesecreta" 'Clave que deseas para el formulario
TuPass=InputBox("Clave de Acceso","Introduce la clave","")
If TuPass<>MyPass Then
MsgBox "La clave de acceso al formulario no es valida"
Cancel=-1
End If
1 respuesta
Respuesta de Isaac Reyes
1