Como remover folhas vazias de um(a) Pasta de trabalho do Excel
Imagine que tem um livro grande com várias folhas, mas algumas estão vazias, sem qualquer conteúdo. Para tornar o livro mais profissional e formal, pretende eliminar essas folhas em branco. Em vez de as remover uma a uma, este guia apresenta métodos para eliminar rapidamente todas as folhas vazias.
Remover todas as folhas em branco com VBA
Remover todas as folhas em branco com Kutools para Excel 
Remover todas as folhas em branco com VBA
Apresentamos aqui um código VBA que o ajuda a remover rapidamente todas as folhas em branco de um livro aberto.
1. Prima as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic para Aplicações.
2. Clique em Inserir > Módulo e cole o código VBA abaixo na janela do novo Módulo aberto.
VBA: Elimine folhas 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. Prima a tecla F5 ou clique no botão Executar para executar o VBA. Aparecerá uma caixa de diálogo a perguntar se pretende remover as folhas vazias. Clique em Sim para continuar ou em Não para cancelar a operação.
4. Após clicar em Sim, aparecerá uma caixa de diálogo a indicar o número de folhas removidas. Clique em OK para fechá-la e todas as folhas vazias serão eliminadas.
Remover todas as folhas em branco com Kutools para Excel
Para utilizadores menos experientes no Excel, usar VBA pode ser um método algo complicado. Contudo, com a função Kutools para Excel’s Excluir Planilhas em Branco, pode remover rapidamente todas as folhas vazias de um livro com apenas três cliques do rato!
1. Abra o livro do qual pretende remover as folhas vazias e clique em KUTOOLS PLUS > Folha de cálculo > Excluir Planilhas em Branco. Veja a imagem:
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á
Artigos relacionados:
- Como contar e remover duplicatas de uma lista no Excel?
- Como remover uma cadeia de caracteres após o enésimo carácter no Excel?
- Como remover o texto entre parênteses ou colchetes no Excel?
- Como remover formas de linha 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