1
Abra el libro de Excel que desea trabajar. Hold " Alt" y presione "F11 " para iniciar la consola de VBA .
2
Seleccione el módulo en el que desea añadir el código de la lista en el lado izquierdo de la consola de VBA. Haga doble clic en el módulo para que aparezca el código en el lado derecho de la pantalla. Si no hay ningún módulo está presente , haga clic en cualquiera de las hojas de trabajo que figuran en la parte izquierda de la pantalla, mueva el ratón sobre "Insertar" y elegir la opción " Módulo ". Haga doble clic en el módulo que aparece al abrir una hoja en blanco en la parte derecha de la consola de VBA.
3 Haga clic en el lado derecho de la pantalla para colocar el cursor en el cuadro blanco . Si la casilla está en blanco , escriba "nombre de Sub ( ) ", donde " nombre" es lo que quiere nombrar la macro. Pulse Intro para continuar y Excel VBA entrará automáticamente en el "Sub End" de línea.
4
Type " Dim ws como hoja de trabajo " directamente debajo de la línea " Sub" . Si se trabaja con código existente , escriba esta línea donde se declaran las otras variables y asegurarse de que no hay ya otra variable llamada "ws ". Si la hay, cambie todas las instancias de "ws " en este código para cualquier combinación disponible de dos letras.
5
Coloque el cursor en la línea siguiente , o si usted está trabajando con el código existente , el lugar siempre que lo desee para desproteger la hoja de cálculo . Escriba el siguiente código :
For Each ws En ActiveWorkbook.Worksheets
ws.Unprotect Contraseña : = " zzz "
Siguiente ws
Change " zzz "en el código a lo que su hoja de trabajo es clave . Cuando desee proteger la hoja de nuevo, sólo tiene que introducir estos mismos tres líneas de código , excepto el cambio " desproteger " para "proteger ".