Como mostrar rapidamente apenas a folha ativa ou as planilhas selecionadas no Excel?
Se existirem várias folhas no seu livro de trabalho e, neste momento, pretender mostrar apenas a folha ativa ou Planilhas Selecionadas e ocultar as restantes, como pode resolvê-lo rapidamente sem as ocultar manualmente uma a uma?
Mostrar apenas Planilha Atual com VBA
Mostrar apenas a(s) folha(s) selecionada(s) com Kutools para Excel 
Mostrar apenas Planilha Atual com VBA
Eis um código VBA que oculta rapidamente todas as folhas, exceto a ativa.
1. Prima Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. Em seguida, clique em Inserir > Módulo e cole o código VBA seguinte na nova janela do Módulo.
VBA: Mostrar apenas Planilha Atual
Sub Macro1()
'UpdatebyKutoolsforExcel20160409
Dim xSht As Object
For Each xSht In ThisWorkbook.Sheets
If xSht.Name <> ThisWorkbook.ActiveSheet.Name
Then xSht.Visible = False
Next
End Sub3. Clique no botão Executar ou prima a tecla F5 para executar o VBA. Agora, apenas a Planilha Atual é apresentada; as restantes estão ocultas.
Mostrar apenas a(s) folha(s) selecionada(s) com Kutools para Excel
Se tiver o Kutools para Excel instalado, pode ocultar rapidamente as folhas inativas ou não selecionadas com um único clique.
Após instalar gratuitamenteKutools para Excel, proceda da seguinte forma:
Ative uma folha ou selecione as folhas que pretende mostrar e, em seguida, clique em Kutools > Mostrar & Ocultar > Ocultar planilhas inativas. Veja a imagem:
Agora, as folhas não selecionadas estão ocultas.
Dica: Se pretender mostrar todas as folhas, clique em Kutools > Mostrar & Ocultar > Mostrar Todas as Folhas. Veja a imagem:
Artigos Relacionados
- Como ocultar linhas com base no valor de uma célula no Excel?
- Como criar uma lista dinâmica com os nomes das folhas de cálculo no Excel?
- Como renomear folhas de cálculo com base nos valores das células no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos