Proteger hoja de excel

Por medio de macros oculta la hoja usando el valor xlVeryHidden en la
propiedad Visible del objeto Worksheet. Para verla, seria algo asi:

Public Sub VerHoja()
If InputBox("contraseña")="password" Then Worksheets("tu
hoja").Visible=xlVisible
End Sub

La clave seria "password" y "tu hoja" es el nombre de la etiqueta de la hoja
que ocultas, obviamente protege el codigo del proyecto para que la clave no
se pueda ver o encriptala en un archivo, o como pueda ocurrirte para
proteger la clave.

Otra cosa, seria bueno que la vuelvas a ocultar antes de grabar

Private Sub Workbook_BeforeSave()
Worksheets("tu hoja").Visible=xlVeryHidden
End Sub

"parrix" escribió en el mensaje
news:360001c4294c$4e2be790$
¿hay alguna opción de proteger con una clave particular la
apertura de una determinada/s hoja/s?

Hola Parrix y Manuel

El dia de hoy he observado varios mensajes donde se trata
el tema de proteccion de hojas y la solucion dandole el
valor xlveryhidden a la propiedad visible de la hoja de
trabajo.

Recuerden que el simple codigo:
For intContador=1 to ActiveWorkbook.worksheets.Count
ActiveWorkbook.Worksheets(intcontador).Visible=True
Next intContador

Muestra todas las hojas de trabajo del libro activo por
muy ocultas que se encuentren

Saludos,

Henry

Por medio de macros oculta la hoja usando el valor

xlVeryHidden en la

propiedad Visible del objeto Worksheet. Para verla, seria

algo asi:

Public Sub VerHoja()
If InputBox("contraseña")="password" Then Worksheets

("tu

hoja").Visible=xlVisible
End Sub

La clave seria "password" y "tu hoja" es el nombre de la

etiqueta de la hoja

que ocultas, obviamente protege el codigo del proyecto

para que la clave no

se pueda ver o encriptala en un archivo, o como pueda

ocurrirte para

proteger la clave.

Otra cosa, seria bueno que la vuelvas a ocultar antes de

grabar

Private Sub Workbook_BeforeSave()
Worksheets("tu hoja").Visible=xlVeryHidden
End Sub

"parrix" escribió

en el mensaje

news:360001c4294c$4e2be790$
¿hay alguna opción de proteger con una clave particular la
apertura de una determinada/s hoja/s?


.