Sub-planilhas

Question

Tenho um arquivo com várias planilhas.

Uma planilha que vou chamar de Mestre e outras  que vou chamar de Detalhes.

Depois eu tenho outra mestre com suas detalhes , de forma que tenho no arquivo, por ex.

Plan 1 que é mestre da plan 2 , da plan3 e da plan4 (por exemplo)

Plan 5 que é mestre da plan6, plan7 (por exemplo também) e assim por diante.

Para trabalhar com este arquivo que é muito longo fica demorado porque em algum momento as planilhas detalhes não são necessárias.

Esconder e depois ter que reexibir uma a uma ,  também é demorado.

Gostaria então de poder ocultar ou reexibir as planilhas de detalhes utilizando um comando na própria guia da planilha mestre.

É possível?

Answer 1

Olá,

você pode usar uma macro para ocultar ou reexibir as planilhas de detalhe todas de uma vez.

Adicione um botão (disponível na guia Desenvolvedor > Controles > Inserir > Controles de Formulário) e clique em "Novo" para ele abrir o editor do Visual Basic. O código ficará mais ou menos assim (use os seus nomes de planilha):

Sub Button1_Click()

'Oculta e reexibe planilhas de detalhe

Dim blnVisible As Boolean

On Error GoTo ErrHandler

'Pega o status atual de uma planilha de detalhe

blnVisible = ThisWorkbook.Worksheets("Plan2").Visible

'Alterna a visibilidade de todas as planilhas de detalhe

ThisWorkbook.Worksheets("Plan2").Visible = Not blnVisible

ThisWorkbook.Worksheets("Plan3").Visible = Not blnVisible

ExitHere:

Exit Sub

ErrHandler:

MsgBox Err.Description & vbCrLf & Err.Number & vbCrLf & Err.Source, vbCritical, "Módulo1-Button1_Click"

Resume ExitHere

Resume

End Sub

Answer 2

Muitissimo Obrigada. Foi útil. Consegui resolver. Desculpe não ter sido tão ágil em agradecer quanto você foi em responder.

Malu