Como mostrar toda a planilha do excel?

Question

Eu tenho um arquivo do excel 2007 com muitas folhas e preciso ocultar ou mostrar todas elas (exceto uma).

É fácil esconder toda a folha, mas como mostrar todas as 200 folhas juntas?

Eu sei que posso escrever uma macro para mostrar as folhas, mas para montar dessa maneira eu tenho que extrair todo o nome das folhas para continuar.

    

Answer 1

Não tenho certeza porque você teria que extrair todos os nomes das planilhas.

Ocultar folhas

AFAIK existem duas maneiras de fazer isso.

Selecione todas as planilhas que você deseja ocultar e, em seguida, clique com o botão direito do mouse e selecione "ocultar". Ou, na guia Início , no grupo Células , clique em Formato , e sob Visibilidade , clique em Ocultar & Mostrar e, em seguida, clique em Ocultar folha .

Aoutramaneiradefazerissoéfazeroloopdasplanilhascomumamacrosimples,ocultandotodasasplanilhasalémdasselecionadasatualmente:

SubhideSheets()DimwSAsWorksheet,CurrentAsStringCurrent=ActiveSheet.NameForEachwSInWorksheetsIfNotwS.Name=CurrentThenwS.Visible=FalseEndIfNextEndSub

Mostrandofolhas

Paramostrartodasasfolhasnovamente,ocódigoéaindamaissimples.

SubshowSheets()DimwSAsWorksheetForEachwSInWorksheetswS.Visible=TrueNextEndSub

Extra

Sevocêdesejasegmentarumaplanilhaespecífica,quenãoéaatualmenteativa(paraocultartodasasexibições,mastodasoutodas),bastaalteraraCurrent=ActiveSheet.NameparaCurrent=InputBox("Enter Sheet Name") e você pode nomear a planilha em uma caixa de entrada em vez disso.