Una macro para proteger las hojas de trabajo en libro cerca

A veces usted tiene que enviar su libro de Excel en el mundo con protegidos hojas de trabajo específicas. Si usted encuentra que usted está constantemente proteger y desproteger las hojas antes de distribuir los libros, la macro aquí puede ayudar.

Cómo funciona el macro

El código se activa por eventos BeforeClose del libro. Cuando intenta cerrar el libro, este evento se desencadena, que ejecuta el código dentro. La macro protege automáticamente la hoja especificada con la contraseña dada, y luego guarda el libro:

Private Sub Workbook_BeforeClose (Cancel As Boolean) 'Etapa 1. Proteja el foliadas con passwordSheets ("Sheet1") Proteja Contraseña: = "RED"' Paso 2 Save la workbookActiveWorkbook.SaveEnd Sub

En el Paso 1, usted está especificando explícitamente qué hoja para proteger - Hoja1, en este caso. También proporciona el argumento de la contraseña, la contraseña: = "RED", que define la contraseña necesaria para eliminar la protección.

Este argumento de la contraseña es opcional. Si lo omite, la hoja seguirá siendo # 173-protegida, pero usted no necesitará una contraseña para desproteger la misma.

Contraseñas de Excel entre mayúsculas y minúsculas, por lo que usted querrá prestar atención a la contraseña exacta y capitalización que está utilizando.

Paso 2 le dice a Excel para guardar el libro. Si no guarda el libro, la protección de la hoja que acaba de aplicar no estará en efecto la próxima vez que se abre el libro.

Cómo utilizar la macro

Para implementar esta macro, tiene que copiar y pegar en la ventana de código de evento Workbook_BeforeClose. La colocación de la macro aquí permite que se ejecute cada vez que se intenta cerrar el libro:

  1. Activar el Editor de Visual Basic presionando Alt + F11.

  2. En la ventana de proyecto, encuentra tu proyecto / nombre del libro y haga clic en el signo más junto a él para ver todas las hojas.

  3. Haga clic en ThisWorkbook.

  4. En la lista desplegable Evento, seleccione el evento BeforeClose.

  5. Escriba o pegue el código en el módulo de nueva creación, la modificación del nombre de la hoja (si es necesario) y la contraseña.

    Ingresa tu código en el evento Workbook BeforeClose.
    Ingresa tu código en el evento Workbook BeforeClose.

Tenga en cuenta que usted puede proteger hojas adicionales al añadir declaraciones de adición antes de la declaración Activeworkbook.Save.




» » » » Una macro para proteger las hojas de trabajo en libro cerca