Como bloquear hoja y no permitir insertar

Tengo un archivo excel con varias hojas, todas ocultas solo una visible (hoja2 (Menu Principal)).

Lo que necesito es como bloquear está hoja y también que el usuario no pueda insertar otras hojas; esto mediante código VBA .


1 Respuesta

Respuesta

[Hola

Pues sigue usando el evento "Open" pero agrega lo siguiente, al inicio:

ActiveWorkbook.Protect Password:="TuClave", Structure:=True, Windows:=False
Hoja1. Protect "TuClave"

La primera línea protege el libro impidiendo que se inserten más hojas; la segunda protege la hoja evitando que se hagan cambios en ella.

Ojo con algo, para mostrar/ocultar las hojas deberás aplicar algo así:

ActiveWorkbook. Unprotect "TuClave" 'Desproteges el libro
' Aquí lo que quieras hacer como ocultar o mostrar hojas
ActiveWorkbook.Protect Password:="TuClave", Structure:=True, Windows:=False ´lo vuelves a proteger

Comentas

Abraham Valencia

Gracias Abraham.

ya lo puse como me comentas pero me sale un error.


Colócalo después de ocultar las hojas

Abraham Valencia

Ya lo cambie y sale el mismo error.

Pues no debería ¿por qué no envías como te ha quedado?

Abraham Valencia

Si me pasas tu correo te envío el archivo para que lo revises

Coloca el archivo en un "Drive" y comparte por aquí el enlace.

Abraham Valencia

Algunas líneas que agregué a un par de las macros asociadas a botones como para que te guíes:

https://1drv.ms/x/s!ApkTgtnWCTgAjTerhBWSfqgML7Q5 

Saludos]

Abraham Valencia

Sigue arrojando error, puedes verificar al abrir el archivo o dar click a los botones del menu. Arroja error

Como te comenté, revisa que cambios hice ya que NO cambie todo, revisa y toma de ejemplo.

Abraham Valencia

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas