Macro de Excel con contraseña: Excel Excel VBA
Buenas noches, me llamo Miguel y durante el dia de hoy os traigo un nuevo artículo.
Así como puede proteger con contraseña libros y hojas de trabajo, también puede contraseña protege una macro dentro 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"). Value = "Este es un código secreto"
2. Luego haga clic en Herramientas, Propiedades del proyecto VBAP.
3. En la pestaña Protección, marque "Bloquear proyecto para ver" e ingrese una contraseña dos veces.
4. Haga clic en Aceptar.
5. Guarde, cierre y vuelva a abrir el archivo de Excel. Intenta 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 "simple".
6. Si desea proteger la macro con contraseña ejecutado, agregue las siguientes líneas de código:
contraseña = Application.InputBox ("Ingresar contraseña", "Contraseña protegida")
Seleccione Caso contraseña
Caso Es = Falso
Caso Es = "fácil"
Rango ("A1"). Value = "Este es un código secreto"
Caso Otra cosa
MsgBox "Contraseña incorrecta"
Aleta Seleccione
Resultado al hacer clic en el botón de comando de 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" de nuevo) se ejecutará el código secreto. Si la contraseña que ingresó 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 contra la visualización.
Deja una respuesta