Ga naar hoofdinhoud

Hoe verwijder ik rijen die bepaalde tekst niet bevatten in Excel?

Misschien weten sommigen van jullie hoe ze de hele rijen moeten verwijderen als ze bepaalde teksten in Excel bevatten, maar als je de rij wilt voltooien als ze de bepaalde teksten niet bevatten, hoe zou je dat dan kunnen doen? Volg nu deze tutorial, misschien vindt u de manier om dit probleem in Excel op te lossen.

Verwijder rijen die bepaalde tekst niet bevatten met Filter

Verwijder rijen die bepaalde tekst niet bevatten met VBA

Verwijder rijen die bepaalde tekst niet bevatten met Kutools voor Excel


pijl blauw rechts bel Verwijder rijen die bepaalde tekst niet bevatten met Filter

In Excel kan de filterfunctie 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 teksten bevat waarop u rijen wilt verwijderen, en klik op Data > FILTER. Zie screenshot:

doc-delete-rijen-niet-bevatten-1
doc-pijl
doc-delete-rijen-niet-bevatten-2

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

doc-delete-rijen-niet-bevatten-3

3. Vervolgens kunt u alleen de koptekstrij zien en worden de rijen die bepaalde tekst niet bevatten, gefilterd. Zie screenshot:

doc-delete-rijen-niet-bevatten-4

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

doc-delete-rijen-niet-bevatten-5

5. Dan klikken Data > FILTER nogmaals, en dan worden alle rijen die bepaalde tekst niet bevatten verwijderd. Zie screenshot:

doc-delete-rijen-niet-bevatten-6
doc-pijl
doc-delete-rijen-niet-bevatten-7

pijl blauw rechts bel Verwijder rijen die bepaalde tekst niet bevatten met VBA

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

1. druk op Alt + F11 om de Microsoft Visual Basic voor toepassingen venster.

2. Klik in het venster op Invoegen > Module om een ​​nieuw modulevenster weer te geven en kopieer vervolgens de volgende VBA-code naar het modulevenster.

VBA: verwijder de hele rij als de cel bepaalde tekst bevat.

Sub DeleteRowNoInclude()
'Update20140618
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. klikken lopen knop, en er verschijnt een dialoogvenster waarin u een bereik kunt selecteren om te werken. Zie screenshot:

doc-delete-rijen-niet-bevatten-8

4. Dan klikken OKen typ de tekst waarvan u de rijen wilt verwijderen in een ander pop-upvenster. Zie screenshot:

doc-delete-rijen-niet-bevatten-9

5. klikken OK, en de rijen die geen Apple bevatten, worden verwijderd.


pijl blauw rechts bel Verwijder rijen die bepaalde tekst niet bevatten met Kutools voor Excel

Als u denkt dat de bovenstaande methoden niet gemakkelijk voor u zijn, kunt u deze gebruiken Kutools for Excel's Selecteer specifieke cellen kenmerk.

Kutools for Excel bevat meer dan 300 handige Excel-tools. Gratis te proberen zonder beperking binnen 30 dagen. Get it Now

1. Selecteer de kolom waarin u de rijen wilt verwijderen die de bepaalde tekst niet bevatten, en klik op Kutools > Selecteer Tools > Selecteer specifieke cellen. Zie screenshot:

doc-delete-rijen-niet-bevatten-10

2. En in de Selecteer specifieke cellen dialoogvenster, vink aan Hele rijEn Select Bevat geen, en typ de bepaalde tekst in het tekstvak, u kunt ook op de bereikknop in het Specifiek type sectie om de cel te selecteren die de bepaalde tekst bevat.

doc-delete-rijen-niet-bevatten-11

3. Dan klikken Ok, dan worden de rijen die bepaalde tekst niet bevatten, geselecteerd, klik met de rechtermuisknop om te selecteren Verwijder vanuit het contextmenu. Zie screenshot:

doc-delete-rijen-niet-bevatten-12

4. Nu worden alle rijen verwijderd die geen bepaalde tekst in het bereik bevatten. Klik hier voor meer informatie over Select Specific Cells.


Relatieve artikelen:

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am trying to modify the VBA code to add an option like this,

Dim xOpt As Integer
xOpt = Application.InputBox("Rows Around Kept (0, 1, 2)", xTitleId, "", Type:=1)

where 0 is the same as your code above where it keeps only the row with specified word in it and deletes all other rows.
where 1 keeps the rows immediately above and below the rows with the specified word in it and deletes all other rows.
where 2 keeps the 2 rows above and below the rows with the specified words in it and deletes all other rows.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations