La contraseña protege macro de Excel
Al igual que usted puede contraseña proteger y libros de hojas de trabajo, se puede proteger con contraseña una macro en Excel de ser visto (y ejecutado).
Coloque un botón de comando en la hoja de trabajo y añadir las líneas de código siguientes:
-
En primer lugar, crear una macro simple que desea proteger.
Range("A1").Value = "This is secret code"
-
A continuación, haga clic en Herramientas, Propiedades VBAProject.
-
En la ficha Protección, verificación «Bloquear proyecto para visualización» y escriba una contraseña dos veces.
-
Haga clic en OK.
-
Guardar, cerrar y volver a abrir el archivo de Excel. Trate de ver el código.
El siguiente cuadro de diálogo aparecerá:
Todavía se puede ejecutar el código haciendo clic en el botón de comando pero no se puede ver o editar el código más (a menos que conozca la contraseña). La contraseña para el archivo de Excel descargable es «fácil».
-
Si desea proteger con contraseña el macro de ser ejecutado, agregue las siguientes líneas de código:
Dim password As Variant password = Application.InputBox("Enter Password", "Password Protected") Select Case password Case Is = False 'do nothing Case Is = "easy" Range("A1").Value = "This is secret code" Case Else MsgBox "Incorrect Password" End Select
Como resultado al hacer clic en el botón de comando en la hoja:
Explicación: La macro utiliza el método InputBox del objeto de aplicación. Si los clics de los usuarios Cancelar, este método devuelve False y no pasa nada (InputBox desaparece). Sólo cuando el usuario conoce la contraseña ( «fácil» de nuevo), se ejecutará el código secreto. Si la contraseña introducida es incorrecta, se muestra un MsgBox. Tenga en cuenta que el usuario no puede echar un vistazo a la contraseña en el Editor de Visual Basic porque el proyecto está protegido de ser vistos.