Como contar o número de folhas visíveis numa pasta de trabalho?
Numa pasta de trabalho extensa com várias folhas, algumas estão visíveis e outras ocultas. Em determinados casos, poderá precisar de contar o número total de folhas visíveis da pasta de trabalho. Como pode fazê-lo rapidamente? Apresento-lhe agora alguns truques para contar rapidamente o número de folhas visíveis numa pasta de trabalho.
Contar apenas o número de folhas visíveis com VBA
Contar o número de folhas visíveis/ocultas/todas as folhas com Kutools para Excel ![]()
Contar apenas o número de folhas visíveis com VBA
No Excel, em vez de contar manualmente as folhas visíveis uma a uma, pode usar o VBA para obter esse número rapidamente.
1. Prima Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications, depois clique em Inserir > Módulo para abrir um novo módulo.
2. Cole o seguinte código VBA na janela do Módulo.
VBA: Contar o número de folhas visíveis de uma pasta de trabalho
Sub VisibleSheetsCount()
'UpdatebyKutoolsforExcel20150909
Dim xSht As Variant
Dim I As Long
For Each xSht In ActiveWorkbook.Sheets
If xSht.Visible Then I = I + 1
Next
MsgBox I & " sheets are visible", , "Kutools for Excel"
End Sub
3. Prima o botão Executar. Aparecerá uma caixa de diálogo com o número de folhas visíveis.

Contar o número de folhas visíveis/ocultas/todas as folhas com Kutools para Excel
Se não estiver familiarizado com o VBA, pode utilizar a Kutools para Excel’s Navegação para visualizar rapidamente o número de folhas visíveis, ocultas e de todas as folhas.
1. Abra a pasta de trabalho cujo número de folhas visíveis pretende contar e clique em Kutools > Navegação. Veja a imagem:

2. Em seguida, o painel Navegação aparece no lado esquerdo da planilha atual. Clique no separador Pasta de Trabalho e Planilha para aceder à secção Pasta de Trabalho e Planilha. Na parte inferior do painel, pode ver o número de folhas visíveis, ocultas e o total de folhas (incluindo as visíveis e as ocultas). Veja a imagem:

Se quiser ocultar a Navegação, basta clicar em Kutools > Navegação para a desativar.
Kutools para Excel’s Navegação é poderosa: com ela, pode visualizar a lista de folhas, a lista de nomes de células, a lista de cabeçalhos de coluna e ainda adicionar intervalos, imagens e fórmulas como textos automáticos. Além disso, pode localizar e substituir uma palavra em todas as planilhas selecionadas.Clique aqui para saber mais sobre Navegação.
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á
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