Como filtrar uma lista e excluir as demais linhas ocultas ou visíveis no Excel?
Para uma lista filtrada, pode ser necessário excluir as linhas ocultas ou visíveis para manter apenas os dados úteis. Neste artigo, mostraremos os métodos de exclusão das demais linhas ocultas ou visíveis de uma lista filtrada no Excel.
Exclua linhas ocultas na planilha ativa com o código VBA
Exclua as linhas visíveis da lista filtrada selecionando todas as células visíveis
Exclua facilmente linhas ocultas ou visíveis da lista filtrada com o Kutools para Excel
Exclua linhas ocultas na planilha ativa com o código VBA
Esta seção mostrará o código VBA para excluir linhas ocultas na planilha ativa. Faça o seguinte.
1. Ative a planilha que você precisa para excluir as linhas ocultas, pressione outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.
2. Na janela Microsoft Visual Basic for Applications, clique em inserção > Módulo. Em seguida, copie e cole o código VBA abaixo na janela Módulo.
Código VBA: Excluir linhas ocultas
Sub RemoveHiddenRows()
Dim xRow As Range
Dim xRg As Range
Dim xRows As Range
On Error Resume Next
Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
If xRows Is Nothing Then Exit Sub
For Each xRow In xRows.Columns(1).Cells
If xRow.EntireRow.Hidden Then
If xRg Is Nothing Then
Set xRg = xRow
Else
Set xRg = Union(xRg, xRow)
End If
End If
Next
If Not xRg Is Nothing Then
MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
xRg.EntireRow.Delete
Else
MsgBox "No hidden rows found", , "Kutools for Excel"
End If
End Sub
3. aperte o F5 chave para executar o código. Se houver linhas ocultas na planilha ativa, depois de executar o código, uma caixa de diálogo aparecerá para informar quantas linhas ocultas foram excluídas. Clique no OK botão para excluir as linhas ocultas. Veja a imagem:
Caso contrário, você obterá a seguinte caixa de diálogo após executar o código.
Note: o código VBA acima não só pode excluir linhas ocultas da lista filtrada, mas também excluir linhas ocultas que você ocultou manualmente antes.
Exclua as linhas visíveis da lista filtrada selecionando todos os recursos de células visíveis
Para excluir as linhas visíveis da lista filtrada, faça o seguinte.
1. Selecione todas as linhas filtradas e pressione F5 chave para abrir o ir para caixa de diálogo e clique no Destaque botão. Veja a imagem:
2. No Ir para especial caixa de diálogo, verifique a Células visíveis apenas opção e, em seguida, clique no OK botão.
3. Agora todas as linhas visíveis estão selecionadas, clique com o botão direito na seleção e clique em Eliminar linhas.
Até agora, todas as linhas visíveis são excluídas da lista filtrada.
Exclua facilmente linhas ocultas ou visíveis da lista filtrada com o Kutools para Excel
Os dois métodos acima podem não ser as soluções desejadas para muitos usuários do Excel; aqui, apresentamos uma ferramenta útil. Com o Excluir linhas e colunas ocultas (visíveis) utilidade de Kutools for Excel, você pode excluir facilmente linhas ocultas em intervalo / planilhas selecionadas, planilha ativa ou todas as planilhas no Excel.
Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.
1. Se você deseja excluir apenas as linhas ocultas ou visíveis de uma lista filtrada, selecione o intervalo filtrado manualmente e clique em Kutools > Apagar > Excluir linhas e colunas ocultas (visíveis). Veja a imagem:
2. No Excluir linhas e colunas ocultas (visíveis) caixa de diálogo, mantenha o No intervalo selecionado selecionado no Olhar dentro lista suspensa (você pode selecionar outras opções conforme necessário), verifique o Linhas opção no Excluir tipo seção, e na Tipo detalhado seção, cheque Linhas visíveis or Linhas ocultas opção conforme você precisa. E finalmente clique no OK botão.
3. Em seguida, uma caixa de diálogo aparecerá para informar quantas linhas foram excluídas, clique no OK botão.
Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.
Exclua linhas ocultas ou visíveis da lista filtrada com o Kutools para Excel
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!