Como contar rapidamente o número de planilhas ocultas no Excel?

Se você tiver uma pasta de trabalho grande com centenas de planilhas, e algumas delas estiverem ocultas. Para atender a algumas necessidades especiais, você deseja saber o número de planilhas ocultas na pasta de trabalho, como você pode fazer em vez de contá-las uma por uma? Agora vou apresentar dois truques para contar rapidamente as planilhas ocultas de uma vez.

Contar folhas ocultas com VBA

Contar folhas ocultas / visíveis com Kutools para Excel

Exclua as planilhas ocultas ou exiba todas as planilhas ocultas com o Kutools para Excel

---

Contar folhas ocultas com VBA

Eu apresento um código VBA que pode abrir uma caixa de diálogo para informar o número de planilhas ocultas em uma pasta de trabalho.

1. Pressione Alt + F11 chaves para habilitar o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole o código abaixo no novo Módulo janela.

VBA: conte folhas ocultas.

Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
    If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
    "Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub

3. Pressione F5 para executar o código, e uma caixa de diálogo aparecerá para informar o número de planilhas ocultas e o número de planilhas visíveis.

---

Contar folhas ocultas / visíveis com Kutools para Excel

Se você não estiver familiarizado com o VBA, pode instalar gratuitamente Kutools for Excel para contar o número de folhas, folhas ocultas e folhas visíveis de relance.

Depois de instalação grátis Kutools para Excel, faça o seguinte:

1. Clique Kutools > Navegação para exibir o painel. Veja a imagem:

2. Então clique Livro e Folha de Trabalho botão para listar os livros e planilhas e vá para a parte inferior do painel, você pode encontrar o número de folhas totais, folhas ocultas e folhas visíveis.

Dica: Se você não precisa mais do painel de navegação, clique Kutools > Navegação novamente para escondê-lo.

---

Exclua as planilhas ocultas ou revele todas as planilhas ocultas com o Kutools para Excel

Com a Kutools for Excel, você também pode remover todas as folhas ocultas com um clique.

1. Se você deseja reexibir todas as páginas ocultas, basta clicar Kutools > Aparecer esconder > Reexibir todas as folhas ocultas.

2. Se você deseja excluir todas as folhas ocultas, basta clicar Empreendimento > Planilha > Excluir todas as folhas ocultas. Veja a imagem: