Como excluir linhas que não contêm determinado texto no Excel?

Talvez alguns de vocês saibam como excluir as linhas inteiras quando elas contêm certos textos no Excel, mas se você quiser excluir a linha inteira quando elas não contêm esses textos específicos, como você faria? Agora, siga este tutorial e você pode encontrar uma maneira de resolver esse problema no Excel.

Excluir linhas que não contêm determinado texto com Filtro

Excluir linhas que não contêm determinado texto com VBA

Excluir linhas que não contêm determinado texto com Kutools para Excel

---

Excluir linhas que não contêm determinado texto com Filtro

No Excel, a função Filtro pode ajudá-lo rapidamente a filtrar as linhas que não contêm determinado texto, e então você pode selecioná-las para excluí-las.

1. Selecione a coluna que contém os textos nos quais você deseja basear a remoção das linhas e clique em Dados > Filtro. Veja a captura de tela:

2. No cabeçalho da coluna, há um botão de filtro; clique nele para abrir a lista suspensa, marque tudo exceto o texto específico no qual você deseja basear. Veja a captura de tela:

3. Então você pode ver apenas a linha do cabeçalho e as linhas que não contêm o texto específico sendo filtradas. Veja a captura de tela:

4. Selecione todas elas, exceto a linha do cabeçalho, e clique com o botão direito para selecionar Excluir Linha no menu de contexto. Veja a captura de tela:

5. Em seguida, clique novamente em Dados > Filtro, e todas as linhas que não contêm o texto específico serão excluídas. Veja a captura de tela:

---

Excluir linhas que não contêm determinado texto com VBA

O VBA é muito útil para operações algo difíceis no Excel, e siga os passos abaixo para excluir as linhas que não contêm determinado texto.

1. Pressione Alt + F11 para exibir a janela Microsoft Visual Basic for Applications.

2. Na janela, clique em Inserir > Módulo para mostrar uma nova janela de módulo, depois copie o seguinte código VBA na janela do módulo.

VBA: Excluir linha inteira se a célula não contiver determinado texto.

Sub DeleteRowNoInclude()
'Updateby Extendoffice
Dim xRow As Range
Dim rng As Range
Dim WorkRng As Range
Dim xStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xStr = Application.InputBox("Text", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 1 Step -1
    Set xRow = WorkRng.Rows(i)
    Set rng = xRow.Find(xStr, LookIn:=xlValues)
    If rng Is Nothing Then
       xRow.Delete
    End If
Next
Application.ScreenUpdating = True
End Sub

3. Clique Executar botão, e uma caixa de diálogo aparecerá para você selecionar um intervalo para trabalhar. Veja a captura de tela:

4. Em seguida, clique em OK e digite o texto no qual você deseja basear a remoção das linhas em outra caixa de diálogo pop-up. Veja a captura de tela:

5. Clique em OK, e as linhas que não contêm Maçã serão removidas.

---

Excluir linhas que não contêm determinado texto com Kutools para Excel

Se você acha que os métodos acima não são fáceis para você, pode usar o recurso Selecionar Células Específicas do Kutools para Excel.

Kutools para Excel inclui mais de 300 ferramentas úteis para o Excel. Gratuito para experimentar sem limitação por 30 dias. Obtenha-o Agora

1. Selecione a coluna onde você deseja excluir as linhas que não contêm o texto específico e clique em Kutools > Ferramentas de Seleção > Selecionar Células Específicas. Veja a captura de tela:

2. E na caixa de diálogo Selecionar Células Específicas, marque Linha Inteira, e selecione Não Contém, e digite o texto específico na caixa de texto; também é possível clicar no botão de intervalo na seção Tipo Específico para selecionar a célula que contém o texto específico.

3. Em seguida, clique em Ok, então as linhas que não contêm o texto específico serão selecionadas; clique com o botão direito para selecionar Excluir no menu de contexto. Veja a captura de tela:

4. Agora todas as linhas que não contêm o texto específico no intervalo foram removidas. Clique aqui para mais informações sobre Selecionar Células Específicas.

---

Artigos Relacionados:

• Excluir linhas inteiras se a célula não contiver zero no Excel
• Excluir linhas que não correspondem aos critérios em outra planilha