Pergunte aqui

Histórico de revisões [voltar]

clique para ocultar/mostrar a revisão 1
Versão inicial

Olá @Júnio Vieira, segue uma versão de macro 2007 acima, que funciona perfeitamente no libreoffice e para versões da Microsoft também.

Rem Attribute VBA_ModuleType=VBAModule

Option VBASupport 1

Sub Ocultar_Sheets ()

Worksheets("Plan1").Visible = False
Worksheets("Plan2").Visible = False
Worksheets("Plan3").Visible = False

End Sub

Sub Reexibir_Sheets ()

Worksheets("Plan1").Visible = True
Worksheets("Plan2").Visible = True
Worksheets("Plan3").Visible = True

End Sub

Observação: Copie deste a frase Rem Attribute VBA_ModuleType=VBAModule

clique para ocultar/mostrar a revisão 2
No.2 Revision

Olá @Júnio Vieira, segue uma versão de macro 2007 acima, que funciona perfeitamente no libreoffice e para versões da Microsoft também.

Rem Attribute VBA_ModuleType=VBAModule

VBA_ModuleType=VBAModule

Option VBASupport 1

1

Sub Ocultar_Sheets ()

()
 Worksheets("Plan1").Visible = False
 Worksheets("Plan2").Visible = False
 Worksheets("Plan3").Visible = False
False

End Sub

Sub

Sub Reexibir_Sheets ()

()
 Worksheets("Plan1").Visible = True
 Worksheets("Plan2").Visible = True
 Worksheets("Plan3").Visible = True
True  

End Sub

End Sub

Observação: Copie deste a frase Rem Attribute VBA_ModuleType=VBAModule