Ocultar todas las hojas menos Una

17/06/2005 - 03:44 por José A. Castrejón | Informe spam
Buenas Noches, estoy tratando de ocultar todas las hojas del libro excepto
una, escribi este codigo, pero no me funciona. Me pueden Ayudar ?


Sub Menu()

Sheets("CAPTURA").Select

With ActiveSheet.Name <> "CAPTURA"
.Visible = False
End With

Load MenuInicial
MenuInicial.Show

End Sub

Gracias por su Ayuda
 

Preguntas similares