Password a una macro
Hola como puedo poner un password a una macro, de modo que si introduce el código ejecute la macro y en caso contrario salga de la macro o muestre un texto. Gracias.
1 respuesta
Respuesta de vkinki
1
Puedes hacerlo incluyendo en el código de la macro lo siguiente;
con = InputBox("Escribe la contraseña?", "Contraseña")
If con = "123456" Then
AQUI ESCRIGE TODO EL CODIGO DE LA MACRO
Else
MsgBox "La contraseña no es correcta", vbInformation, "Error"
End If
En este caso mediante un inputbox te pide que pongas una contraseña y la guarda en la variable Con. Luego mira si esta es igual a la contraseña correcta, (En este caso le he puesto 123456) Si lo es ejecuta el código y si no sale un mensaje de error.
Si tienes dudas escríbeme
con = InputBox("Escribe la contraseña?", "Contraseña")
If con = "123456" Then
AQUI ESCRIGE TODO EL CODIGO DE LA MACRO
Else
MsgBox "La contraseña no es correcta", vbInformation, "Error"
End If
En este caso mediante un inputbox te pide que pongas una contraseña y la guarda en la variable Con. Luego mira si esta es igual a la contraseña correcta, (En este caso le he puesto 123456) Si lo es ejecuta el código y si no sale un mensaje de error.
Si tienes dudas escríbeme
