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:

  1. En primer lugar, crear una macro simple que desea proteger.

Range("A1").Value = "This is secret code"
  1. A continuación, haga clic en Herramientas, Propiedades VBAProject.

Click Tools

  1. En la ficha Protección, verificación «Bloquear proyecto para visualización» y escriba una contraseña dos veces.

Enter a Password Twice

  1. Haga clic en OK.

  2. Guardar, cerrar y volver a abrir el archivo de Excel. Trate de ver el código.

El siguiente cuadro de diálogo aparecerá:

Password Protected from being Viewed

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».

  1. 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:

Password Protected from being Executed

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.