Como remover planilhas vazias de uma pasta de trabalho do Excel
Suponha que você tenha uma pasta de trabalho grande com várias planilhas, mas há algumas planilhas vazias sem nenhum conteúdo. Para tornar a pasta de trabalho mais profissional e formal, você deseja remover essas planilhas em branco da pasta de trabalho. Em vez de remover as planilhas vazias uma por uma, este guia apresenta métodos para remover todas as planilhas em branco rapidamente.
Remover todas as planilhas em branco usando VBA
Remover todas as planilhas em branco usando Kutools para Excel 
Remover todas as planilhas em branco usando VBA
Aqui eu apresento um código VBA para ajudá-lo a remover rapidamente todas as planilhas em branco de uma pasta de trabalho aberta.
1. Pressione as teclas Alt + F11 para habilitar a janela Microsoft Visual for Basic Applications.
2. Clique em Inserir > Módulo, cole o código VBA abaixo na nova janela Módulo aberta.
VBA: Remover planilhas vazias.
Sub DeletEmptySheets()
'UpdatebyKutoolsforExcel20151130
Dim xWs As Worksheet
Dim xAlert As Boolean
Dim xCount As Long
xAlert = Application.DisplayAlerts
Application.DisplayAlerts = False
If MsgBox("Are you sure to remove all empty sheets?", vbYesNo, "Kutools for Excel") = vbNo Then Exit Sub
For Each xWs In ActiveWorkbook.Worksheets
If (Application.CountA(xWs.Cells) = 0) And _
(xWs.Shapes.Count = 0) Then
xWs.Delete
xCount = xCount + 1
End If
Next
MsgBox "You have removed " & xCount & " empty sheet(s)", , "Kutools for Excel"
Application.DisplayAlerts = xAlert
End Sub3. Pressione a tecla F5 ou clique no botão Executar para executar o VBA. Um diálogo aparecerá perguntando se deseja remover as planilhas vazias. Clique em Sim para prosseguir ou Não para cancelar a operação.
4. Após clicar em Sim, um diálogo aparecerá mostrando o número de planilhas removidas. Clique em OK para fechá-lo, e todas as planilhas vazias serão removidas.
Remover todas as planilhas em branco usando Kutools para Excel
Para iniciantes no Excel, usar VBA pode ser um método um tanto difícil de executar. Mas com a função Excluir Planilhas em Branco do Kutools para Excel, você pode remover rapidamente todas as planilhas vazias de uma pasta de trabalho com três cliques do mouse!
1. Habilite a pasta de trabalho da qual deseja remover suas planilhas vazias e clique em Kutools Plus > Planilha > Excluir Planilhas em Branco. Veja a captura de tela:
Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora
Artigos Relacionados:
- Como contar e remover duplicatas de uma lista no Excel?
- Como excluir texto após o enésimo caractere no Excel?
- Como remover texto dentro de colchetes/parênteses no Excel?
- Como remover formas de linha no Excel?
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins