Al igual que puede proteger con contraseña libros y hojas de trabajo, puede proteger con contraseña una macro en Sobresalir de ser visto (y ejecutado).
Coloque un botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:
1. Primero, cree una macro simple que desee proteger.
Rango ("A1"). Valor = "Este es un código secreto"
2. A continuación, haga clic en Herramientas, Propiedades de VBAProject.
3. En la pestaña Protección, marque "Bloquear proyecto para visualización" e ingrese una contraseña dos veces.
4. Haga clic en Aceptar.
5. Guarde, cierre y vuelva a abrir el archivo de Excel. Intente ver el código.
Aparecerá el siguiente cuadro de diálogo:
Aún puede ejecutar el código haciendo clic en el botón de comando, pero ya no puede ver ni editar el código (a menos que sepa la contraseña). La contraseña para el archivo Excel descargable es "fácil".
6. Si desea proteger con contraseña la macro para que no se ejecute, agregue las siguientes líneas de código:
Atenuar contraseña como variante
contraseña = Application.InputBox ("Ingresar contraseña", "Contraseña protegida")
Seleccionar contraseña de caso
El caso es = falso
'hacer nada
Caso es = "fácil"
Rango ("A1"). Valor = "Este es un código secreto"
Caso otro
MsgBox "Contraseña incorrecta"
Finalizar Seleccionar
Resultado al hacer clic en el botón de comando en la hoja:
Explicación: La macro utiliza el método InputBox del objeto Aplicación. Si los usuarios hacen clic en Cancelar, este método devuelve False y no sucede nada (InputBox desaparece). Solo cuando el usuario conozca la contraseña ("fácil" nuevamente), se ejecutará el código secreto. Si la contraseña ingresada es incorrecta, se muestra un MsgBox. Tenga en cuenta que el usuario no puede ver la contraseña en el Editor de Visual Basic porque el proyecto está protegido para que no se pueda ver.
