Hoe rijen die bepaalde tekst niet bevatten in Excel verwijderen?

Misschien weten sommigen van jullie hoe je hele rijen kunt verwijderen wanneer ze bepaalde teksten bevatten in Excel, maar als je de hele rij wilt verwijderen wanneer ze die bepaalde teksten niet bevatten, hoe doe je dat dan? Volg nu deze handleiding en je vindt misschien een manier om dit probleem op te lossen in Excel.

Rijen die bepaalde tekst niet bevatten verwijderen met Filter

Rijen die bepaalde tekst niet bevatten verwijderen met VBA

Rijen die bepaalde tekst niet bevatten verwijderen met Kutools voor Excel

---

Rijen die bepaalde tekst niet bevatten verwijderen met Filter

In Excel kan de functie Filteren u snel helpen om de rijen te filteren die bepaalde tekst niet bevatten, en vervolgens kunt u ze selecteren om te verwijderen.

1. Selecteer de kolom die de teksten bevat waarop u rijen wilt verwijderen, en klik op Gegevens > Filter. Zie screenshot:

2. In de kop van de kolom is er een filterknop, klik erop om de keuzelijst te openen, vink alles aan behalve de bepaalde tekst waarop u wilt baseren. Zie screenshot:

3. Dan kunt u zien dat alleen de koptekstrij en de rijen die bepaalde tekst niet bevatten gefilterd zijn. Zie screenshot:

4. Selecteer ze allemaal behalve de koptekstrij, en klik met de rechtermuisknop om Rij verwijderen te selecteren uit het contextmenu. Zie screenshot:

5. Klik vervolgens opnieuw op Gegevens > Filter, en alle rijen die bepaalde tekst niet bevatten, zijn verwijderd. Zie screenshot:

---

Rijen die bepaalde tekst niet bevatten verwijderen met VBA

VBA is erg handig voor enigszins moeilijke bewerkingen in Excel, volg de onderstaande stappen om de rijen die bepaalde tekst niet bevatten te verwijderen.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster weer te geven.

2. Klik in het venster op Invoegen > Module om een nieuw modulevenster te tonen, kopieer vervolgens de volgende VBA-code naar het modulevenster.

VBA: Verwijder hele rij als cel bepaalde tekst bevat.

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. Klik Uitvoeren knop, en er verschijnt een dialoogvenster waarin u een bereik kunt selecteren om mee te werken. Zie screenshot:<

4. Klik vervolgens op OK, en typ de tekst waarop u rijen wilt verwijderen in een ander pop-updialoogvenster. Zie screenshot:

5. Klik op OK, en de rijen die Apple niet bevatten, worden verwijderd.

---

Rijen die bepaalde tekst niet bevatten verwijderen met Kutools voor Excel

Als u denkt dat de bovenstaande methoden niet eenvoudig voor u zijn, kunt u de functie Specifieke cellen selecteren van Kutools voor Excel gebruiken.

Kutools voor Excel omvat meer dan 300 handige Excel-hulpmiddelen. Gratis proberen zonder beperking gedurende 30 dagen. Download het nu

1. Selecteer de kolom waar u de rijen die bepaalde tekst niet bevatten wilt verwijderen, en klik op Kutools > Selecteer hulpmiddelen > Specifieke cellen selecteren. Zie screenshot:

2. En in het dialoogvenster Specifieke cellen selecteren, vink Volledige rij aan, en selecteer Bevat niet, en typ de bepaalde tekst in het tekstvak, u kunt ook op de bereikknop in de sectie Specificeer type klikken om de cel te selecteren die de bepaalde tekst bevat.

3. Klik vervolgens op Ok, dan worden de rijen die bepaalde tekst niet bevatten geselecteerd, klik met de rechtermuisknop om Verwijderen te selecteren uit het contextmenu. Zie screenshot:

4. Nu zijn alle rijen die bepaalde tekst niet bevatten in het bereik verwijderd. Klik hier voor meer informatie over Specifieke cellen selecteren.

---

Gerelateerde artikelen:

• Verwijder hele rijen als cel geen nul bevat in Excel
• Verwijder rijen die niet overeenkomen met criteria op een ander werkblad