Esconder la hoja antes de guardar

25/05/2004 - 07:17 por Fabian | Informe spam
Alguien me puede explicar como funciona esta macro, la encontré y servia a
mis propósitos, esconder antes de guardar, pero no lo hace, no se como
usarla!
O sea, si la ejecuto, hace lo que tiene que hacer, pero si guardo el libro
no pasa nada, tendria que ser asi o me equivoco.

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

Worksheets("tu hoja").Visible=False ¿Cuál es la diferencia?

Y para que esconda todas las hojas, cual seria el codigo?


Fabian Martin
 

Leer las respuestas

#1 Adolfo
25/05/2004 - 09:45 | Informe spam
Hola Fabian
Si lo que quieres es que se ejecute la macro antes de guardar la tienes que
introducir de la siguiente forma:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Worksheets("tu hoja").Visible=xlVeryHidden

End Sub

Asi, antes de guardar te ocultara la hoja, con xlVeryHidden lo que consigues
es que solo se pueda volver a mostrar desde VBA (o eso creo). Fijate que si
la ocultas asi no aparece en el cuadro mostrar.

un saludo,
Adolfo

Respecto a las direrencias, hay varias formas de ocultar una hoja,
"Fabian" escribió en el mensaje
news:
Alguien me puede explicar como funciona esta macro, la encontré y servia a
mis propósitos, esconder antes de guardar, pero no lo hace, no se como
usarla!
O sea, si la ejecuto, hace lo que tiene que hacer, pero si guardo el libro
no pasa nada, tendria que ser asi o me equivoco.

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

Worksheets("tu hoja").Visible=False ¿Cuál es la diferencia?

Y para que esconda todas las hojas, cual seria el codigo?


Fabian Martin



Preguntas similares