2008-10-10 16 views
6

Tengo alrededor de 25 hojas de trabajo en mi libro de trabajo (hoja de cálculo de Excel). ¿Hay alguna manera de proteger todas las 25 hojas de trabajo con un solo clic? o esta característica no está disponible y tendré que escribir un código VBA para lograr esto. Necesito muy a menudo proteger todas las hojas y desproteger todas las hojas y hacerlo por separado consume mucho tiempo¿Cómo protejo toda la hoja de trabajo en un libro de Excel con un solo clic?

Respuesta

13

No creo que haya una manera de hacerlo sin usar VBA. Si usted está interesado en una solución de VBA, aquí está el código:

Dim ws as Worksheet 
Dim pwd as String 

pwd = "" ' Put your password here 
For Each ws In Worksheets 
    ws.Protect Password:=pwd 
Next ws 

Desprotección es prácticamente el mismo:

Dim ws as Worksheet 
Dim pwd as String 

pwd = "" ' Put your password here 
For Each ws In Worksheets 
    ws.Unprotect Password:=pwd 
Next ws 
3

No creo que haya un botón para hacerlo, pero es de código bastante simple :

para cada contraseña protSheet en las hojas de protSheet.Protect: = "boo" Siguiente protSheet

1

puede protec t el libro de trabajo en lugar de cada hoja y esto detendrá los cambios realizados en todo el libro

1

Puede proteger todas las hojas de trabajo de los cambios del usuario pero aún permitir que los scripts VBA realicen cambios con la opción "UserInterfaceOnly". Esta solución le permite ejecutar cualquier secuencia de comandos de VBA en las hojas de trabajo sin tener que proteger y desproteger cada vez:

Dim ws as Worksheet 
Dim pwd as String 

pwd = "" ' Put your password here 
or Each ws In Worksheets 
    ws.Protect Password:=pwd, UserInterfaceOnly:=True 
Next ws 

Desprotección es la misma que la solución ofrecida por Ben Hoffstein:

Dim ws as Worksheet 
Dim pwd as String 

pwd = "" ' Put your password here 
For Each ws In Worksheets 
    ws.Unprotect Password:=pwd 
Next ws 

Usted puede acceder a este macro con un botón/atajo. En Excel 2010, haga clic con el botón derecho en la barra de herramientas de acceso rápido y seleccione "Personalizar barra de herramientas de acceso rápido". En el menú desplegable para elegir comandos, seleccione "Macros". A continuación, haga clic en el script de VBA que creó para proteger (o desproteger). Finalmente, haga clic en el botón "Agregar>>" y luego "Aceptar" para guardarlo.

Cuestiones relacionadas