Macros y Hojas ocultas

hola Sofia
prueba a ver si te vale esto

Sub desprotegerymostrar()

Sheets("Hojacontraseña").Select
ActiveSheet.Unprotect "contraseña" 'escribe aqui tu contraseña si borrar
las comillas cuando la ejecutes se mostrara el mensaje de insertar la clave
Sheets("Hojaoculta").Visible = True
End Sub

o si quieres puedes probar tambien esta
Sub desprotegerymostrar()

Sheets("Hojacontraseña").Unprotect "contraseña" 'escribe aqui tu
contraseña si borrar las comillas cuando la ejecutes se mostrara el mensaje
de insertar la clave
Sheets("Hojaoculta").Visible = True
End Sub


cualquier cosa comentas
un saludo
Daniel


"Sofía Álvarez" escribió en el
mensaje news:

Hola, y gracias de antemano

Mi problema es el siguiente

Tengo dos hojas Una de ellas oculta y protegido el libro mediante
contraseña.

Pués bien, me gustaría que una vez realizados los cálculos en la hoja
visible, se ejecute una macro que desproteja el libro y visualize la hoja
oculta.

PD: Lo he intentado , pero a la hora de desproteger el libro no funciona.
se
detiene la macro.


Espero vuestra ayuda.

Sofía