23 abril, 2021

EJECUTAR MACROS EN LIBROS PROTEGIDOS CON CONTRASEÑA

Cuando trabajamos con libros de Excel y con proyectos en los que tenemos que utilizar varias hojas, normalmente tendemos a proteger la hoja y también el libro. Utilizamos una contraseña y también ocultamos las hojas para evitar que el usuario pueda modificar o eliminar algún elemento vital para hacer funcionar nuestro trabajo.

Pues bien, resulta que si hacemos todo lo anterior, nos vamos a encontrar con el desagradable resultado de que la macro activada no funciona. Esto se debe a que las hojas están ocultas y además tienen una contraseña para proteger el libro.

El proceso para solventar este problema es básicamente desproteger el libro con la contraseña que se ha puesto, hacer visible la hoja, y ejecutar la macro de nuestro proyecto.

Para finalizar se debe realizar el proceso inverso, es decir, ocultamos la hoja y volvemos a protegerla con contraseña.

Os dejo la macro y espero que os sea de utilidad:

Sub Macro_hoja_oculta()
'Desprotegemos el libro introduciendo la contraseña.
ActiveWorkbook.Unprotect "contraseña"
'hacemos visible la hoja.

Worksheets("Hoja1").Visible = xlSheetVisible
'aquí iría el resto de la macro que queremos ejecutar.


' Pon aquí la macro de tu proyecto

'una vez que acabe el proceso volvemos a seleccionar la hoja.
Sheets("Hoja1").Select

'ocultamos la hoja.
Worksheets("Hoja1").Visible = xlSheetHidden

'volvemos a aplicar la contraseña.
ActiveWorkbook.Protect "contraseña"

End Sub

Comparte este post

Si te ha gustado o tienes alguna duda, puedes dejar aquí tu comentario.

Este sitio web utiliza cookies para que usted tenga la mejor experiencia de usuario. Si continúa navegando está dando su consentimiento para la aceptación de las mencionadas cookies y la aceptación de nuestra política de cookies, pinche el enlace para mayor información.plugin cookies

ACEPTAR
Aviso de cookies