Cómo utilizar la macro If de VBA para determinar si una hoja de trabajo está oculta

La propiedad Visible de la hoja de trabajo puede mostrar si está oculta, 0 significa oculta, -1 significa no oculta, por ejemplo, puede ver el siguiente código:

Sub xxx()

MsgBox Sheet1.Visible

End Sub

El siguiente código puede ocultar la hoja de trabajo:

Sheet1.Visible=0

Declaración para mostrar la hoja de trabajo oculta Como ejercicio de clase, Ven y escribe.