Cómo proteger / desproteger todas las hojas con VBA en Microsoft Excel 2010
En este artículo, aprenderá cómo proteger y desproteger todas las hojas con código VBA.
Para abrir la pantalla del editor de VBA, siga los pasos que se mencionan a continuación:
Haga clic en la pestaña Desarrollador. Desde el grupo Código, seleccione Visual Basic
Click on Insert, and then Module
Esto creará un nuevo módulo.
Ingrese el siguiente código en el Módulo para proteger todas las hojas de trabajo.
Sub Protect ()
‘Recorrer todas las hojas del libro de trabajo
Para i = 1 a Sheets.Count
Hojas (i) .Proteger
Siguiente i
End Sub
Para desproteger todas las hojas de trabajo, use el siguiente código.
Sub UnProtect ()
‘Recorrer todas las hojas del libro de trabajo
Para i = 1 a Sheets.Count
Hojas (i) .UnProtect
Siguiente i
End Sub
Presione la tecla de método abreviado ALT + F8 para abrir la ventana Macro y luego seleccione la macro Proteger.
Alternativamente, puede presionar F5 para ejecutar el código en la pantalla VBA.
Después de ejecutar la macro; todas las hojas estarán protegidas.
Presione ALT + F8 y seleccione Desproteger
Esto desprotegerá todas las hojas de trabajo.
De esta manera, podemos proteger y desproteger las hojas de trabajo cuando sea necesario.