Como ocultar todas as folhas de cálculo no Excel, exceto a especificada ou a ativa?
Ao trabalhar com uma pasta de trabalho do Excel que contém muitas folhas de cálculo, navegar e gerir os seus dados de forma eficiente pode tornar-se um desafio. Em situações como partilhar um relatório, proteger informações confidenciais ou simplesmente reduzir a desorganização no seu espaço de trabalho, poderá querer ocultar todas as folhas exceto uma em particular — geralmente aquela em que está a trabalhar ativamente. Ao exibir apenas a folha relevante, mantém o seu livro limpo, minimiza a confusão do utilizador e direciona a atenção para o conteúdo essencial.
Este artigo apresenta dois métodos práticos para realizar esta tarefa no Excel. Quer opte pelo código VBA pela sua flexibilidade ou pelo Kutools para Excel por uma abordagem mais simples, encontrará uma solução perfeitamente adaptada às suas necessidades.
Ocultar todas as folhas de cálculo exceto a especificada no Excel com código VBA
Ocultar todas as folhas de cálculo exceto a ativa com Kutools para Excel (apenas alguns cliques)
Ocultar todas as folhas de cálculo exceto a especificada no Excel com código VBA
Se está à vontade com automação simples, o VBA (Visual Basic for Applications) oferece-lhe a flexibilidade de ocultar todas as folhas de cálculo, exceto a que especificar. Esta abordagem revela-se especialmente útil na gestão de livros complexos em ambientes profissionais ou na criação de modelos para distribuição. Terá controlo granular sobre a folha que permanece visível e poderá facilmente adaptar a macro para operações em lote no futuro. Tenha em atenção, porém, que o uso de VBA exige que guarde o ficheiro como um livro com macros ativadas (*.xlsm), e os utilizadores terão de ter as macros ativadas para executar estes códigos.
Para realizar esta operação, siga cuidadosamente os passos abaixo:
1. No seu livro aberto, ative primeiro a folha de cálculo que pretende manter visível — assim evita ocultar acidentalmente a folha com que está a trabalhar. De seguida, prima simultaneamente Alt+F11 para abrir a janela do editor Microsoft Visual Basic for Applications.
2. Na janela do Visual Basic for Applications, aceda ao menu e clique em Inserir > Módulo. Isto adicionará um novo módulo onde poderá introduzir o seu código VBA. Veja a imagem:
3. Copie e cole o seguinte código VBA na área em branco da janela do módulo.
Código VBA: ocultar todas as folhas exceto a especificada
Sub SheetHidden()
Dim xWs As Worksheet
Dim xName As String
xName = Application.InputBox("Range", xTitleId, Application.ActiveSheet.Name, Type: = 2)
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> xName Then
xWs.Visible = xlSheetHidden
End If
Next
End Sub4. Após colar o código, certifique-se de que a folha pretendida está ativa na sua janela do Excel. Em seguida, prima F5 para executar o código ou selecione Executar na barra de ferramentas do VBA. Isto irá abrir uma caixa de diálogo onde, por predefinição, o nome da sua planilha atual será apresentado na caixa Intervalo. Normalmente, pode simplesmente clicar no botão OK sem efetuar alterações. Se quiser selecionar outra folha, pode fazê-lo nesta etapa.
5. Após a confirmação, a macro ocultará imediatamente todas as outras folhas de cálculo do livro, exceto a que indicou — poupando-lhe inúmeros passos manuais e mantendo o seu espaço de trabalho organizado, especialmente ao trabalhar com ficheiros grandes contendo múltiplas folhas ou ao preparar um ficheiro para utilização por terceiros.
Lembre-se de que as folhas ocultas não são eliminadas — podem ser reexibidas a qualquer momento. No entanto, se o seu livro contiver apenas uma folha visível, o Excel não permitirá ocultá-la; por isso, certifique-se de que pelo menos uma folha permanece visível. Caso precise tornar novamente visíveis todas as folhas, utilize o seguinte código VBA simples.
Nota: Para reexibir todas as folhas anteriormente ocultas, regresse ao editor VBA premindo Alt + F11. Insira um novo módulo ou utilize o anterior, cole o código abaixo na janela de código e prima F5 para executar o código. Isto restaurará a visibilidade de todas as folhas no seu livro, permitindo-lhe editá-las ou revê-las posteriormente.
Código VBA: mostrar folhas ocultas
Sub SheetUnHidden()
Dim xWs As Worksheet
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.Visible = True
Next
End SubOcultar todas as folhas de cálculo exceto a ativa com Kutools para Excel (apenas um clique)
Se preferir uma opção mais rápida e fácil de usar — especialmente se precisar frequentemente de gerir múltiplas folhas —, o Kutools para Excel oferece uma solução simples e eficaz. Ideal para quem quer evitar escrever e executar código ou para utilizadores que regularmente preparam livros para partilha e procuram um fluxo de trabalho ágil, o Kutools inclui uma funcionalidade dedicada que lhe permite ocultar todas as folhas não selecionadas com apenas alguns cliques do rato.
Para utilizar este método, siga estes passos simples:
1. Primeiro, ative (clique em) a folha de cálculo que pretende manter visível no seu livro. Confirme este passo com atenção, pois o Kutools irá manter apenas a Planilha Atual não oculta após a operação.
2. De seguida, aceda ao Friso do Excel e clique no separador Kutools. Depois, vá a Mostrar & Ocultar e selecione Ocultar planilhas inativas no menu pendente. Isto ocultará imediatamente todas as outras folhas no seu Livro de Trabalho Atual, exceto aquela em que está a trabalhar.
Aplicar esta ação é especialmente útil ao partilhar ficheiros com colegas ou clientes, ao centrar o foco numa apresentação ou ao proteger dados de suporte contra alterações acidentais. O processo é instantâneo — não requer prompts nem configurações adicionais.
Se, posteriormente, precisar de restaurar (ou seja, reexibir) todas as folhas anteriormente ocultas, o Kutools torna este processo igualmente simples. Basta clicar em Kutools > Mostrar / Ocultar > Reexibir Todas as Folhas. O Kutools reexibirá imediatamente todas as folhas de cálculo no livro.
Notas e considerações: Ao utilizar o Kutools, certifique-se de que selecionou a folha correta antes de aplicar a ferramenta de ocultação. Esta função não pode ser anulada com o comando Desfazer habitual (Ctrl+Z), mas pode sempre reexibir todas as folhas conforme descrito acima. Além disso, o Kutools oferece funcionalidades adicionais de gestão em lote de folhas que podem poupar tempo em cenários mais complexos.
Kutools para Excel– Potencie o Excel com mais de 300 ferramentas essenciais, tornando o seu trabalho mais rápido e fácil, e aproveite as funcionalidades de IA para um processamento de dados mais inteligente e uma maior produtividade.Obtenha Já
Soluções alternativas:Para além dos métodos acima, pode considerar outras abordagens consoante as necessidades do seu fluxo de trabalho:
- Ocultar/Reexibir manualmente: Pode clicar com o botão direito do rato em qualquer separador de folha de cálculo e utilizar as opções Ocultar ou Reexibir. Embora adequado para ocultar um pequeno número de folhas, este método torna-se moroso em livros grandes.
- Seleção agrupada e ocultação: Mantenha premida a tecla Ctrl e clique nas folhas que pretende ocultar (exceto naquela que deseja manter visível). Em seguida, clique com o botão direito do rato numa das Guias de Planilha selecionadas e escolha Ocultar. Este método é mais rápido do que ocultar folhas individualmente, mas menos eficiente do que as soluções VBA ou Kutools acima mencionadas quando se trata de muitas folhas.
Ao escolher uma solução, tenha em conta o tamanho do seu livro, a frequência com que realiza a operação e se precisa de automação ou simplicidade. Verifique sempre quais as folhas de cálculo que permanecem visíveis, para evitar ocultar acidentalmente dados importantes.
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