Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe de hele rij te verwijderen als de cel nul bevat in Excel?

Soms wilt u de hele rij verwijderen als de cel nul bevat in Excel, en u kunt ze één voor één verwijderen als er enkele zijn. Maar hoe zit het met het verwijderen van honderden rijen met nul? Je kunt een van de lastige manieren hieronder kiezen om het op te lossen.

Rij verwijderen als cel nul bevat met filterfunctie in Excel

Verwijder rij als cel nul bevat met VBA in Excel

Verwijder rij als cel nul bevat met Kutools voor Excel


Verwijder eenvoudig alle rijen als er in een bepaald bereik in Excel nulwaarden zijn:

sterk> Kutools voor Excel's Selecteer specifieke cellen hulpprogramma helpt u eenvoudig hele rijen te selecteren als er nulwaarden in een bepaald bereik bestaan ​​en u vervolgens snel alle geselecteerde rijen handmatig en zonder fouten kunt verwijderen. Download nu het volledige gratis 60-dag-spoor van Kutools voor Excel nu!

Kutools for Excel: met meer dan 200 handige Excel-add-ins, gratis om zonder beperking in 60-dagen te proberen. Download de gratis proefversie nu!

Tabblad Office Schakel bewerken en browsen met tabbladen in Office in en maak uw werk veel eenvoudiger ...
Kutools voor Excel brengt 300 geavanceerde functies naar Excel en verhoogt uw productiviteit met 80%
  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen en gegevens bewaren; Inhoud gesplitste cellen; Combineer dubbele rijen en som / gemiddelde... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • Favoriete en snel formules invoegen, Bereiken, grafieken en afbeeldingen; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Kutools werkt met Office 2007-2019 en 365. Het ondersteunt alle talen en is zeer eenvoudig te installeren of te implementeren. Volledige functionaliteit 60-daagse gratis proefversie.

Rij verwijderen als cel nul bevat met filterfunctie in Excel

U kunt de functie Filter gebruiken om alle rijen te filteren op basis van de nulwaarden in een bepaalde kolom en vervolgens alle zichtbare rijen later te verwijderen. Doe het als volgt.

1. Selecteer de kolomcellen met de nulwaarden waarvan u de hele rijen wilt verwijderen op basis van en klik vervolgens op Data > filters. Zie screenshot:

2. Vervolgens wordt een vervolgkeuzepijl weergegeven in de eerste cel van de geselecteerde kolom, klikt u op de pijl en selecteert u vervolgens Getalfilters > Is gelijk aan uit de vervolgkeuzelijst.

doc verwijderen als nul 1

3. In de Aangepast AutoFilter dialoogvenster, voer het nummer in 0 in het tekstvak zoals weergegeven onder screenshot en klik vervolgens op de OK knop.

doc verwijderen als nul 1

4. Vervolgens worden alle cellen met nulwaarde in deze bepaalde kolom uitgefilterd. Selecteer alle zichtbare cellen in het filterbereik en klik er met de rechtermuisknop op, selecteer Rijen verwijderen vanuit het rechtsklikmenu. En klik in het pop-upvenster op de knop OK knop. Zie screenshot:

doc verwijderen als nul 1

5. Nu worden alle zichtbare rijen verwijderd. U kunt klikken Data > filters opnieuw om alle gegevens weer te geven zonder cellen met nulwaarde. Zie screenshot:

doc verwijderen als nul 1


Verwijder rij als cel nul bevat met VBA in Excel

In deze sectie wordt de VBA-methode weergegeven om alle rijen te verwijderen als er in een bepaalde kolom in Excel nulwaarden zijn.

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

2. Klik in het Microsoft Visual Basic for Applications-venster op bijvoegsel > module, kopieer en plak vervolgens de volgende VBA-code in het modulevenster.

VBA: verwijder volledige rijen als een nulwaarde bestaat in een bepaald kolombereik in een werkblad

Sub DeleteZeroRow () 'Updateby20140616 Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8 ) Application.ScreenUpdating = False Do Set Rng = WorkRng.Find ("0", LookIn: = xlValues) If Not Rng Is Nothing Then Rng.EntireRow.Delete End If Loop While not Rng Is nothing Application.ScreenUpdating = True End Sub

3. druk de F5 sleutel om de code uit te voeren, in het opduiken KutoolsforExcel in het dialoogvenster, selecteert u het kolombereik dat u volledige rijen wilt verwijderen op basis van de nulwaarden binnenin en klikt u vervolgens op OK knop. Zie screenshot:

doc verwijderen als nul 1

Vervolgens worden alle rijen op basis van de nulwaarden in het opgegeven kolombereik onmiddellijk verwijderd.

doc verwijderen als nul 1


Verwijder rij als cel nul bevat met Kutools voor Excel

Voor veel Excel-gebruikers is het gebruik van VBA-code gevaarlijk om gegevens in Excel te verwijderen. Als je de VBA-code niet echt vertrouwt, raden we je aan hier de Selecteer specifieke cellen nut van Kutools for Excel.

Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis om zonder beperking te proberen in 60-dagen.

1. Selecteer het kolombereik dat u hele rijen verwijdert op basis van de nulwaarden binnenin en klik vervolgens op Kutools > kiezen > Selecteer specifieke cellen. Zie screenshot:

2. In de Selecteer specifieke cellen dialoogvenster, moet u:

(1) Selecteer de Hele rij optie in het Selectie type sectie.

(2) Selecteer Is gelijk aan in de eerste Specifiek type vervolgkeuzelijst en voer vervolgens het nummer in 0 in het tekstvak.

(3) Klik op de OK knop.

3. Er verschijnt een dialoogvenster om u te laten weten hoeveel rijen zijn geselecteerd, klik op OK knop. Nu zijn alle rijen met de nulwaarden in het opgegeven kolombereik geselecteerd. Klik met de rechtermuisknop op een geselecteerde rij en klik vervolgens op Verwijder in het rechtsklikmenu. Zie screenshot:

doc verwijderen als nul 1

Nu worden alle rijen met de nulwaarden in de opgegeven kolom onmiddellijk verwijderd. Zie screenshot:

doc verwijderen als nul 1

Als u een gratis proefversie van dit hulpprogramma wilt hebben, gaat u naar gratis download van de software eerst en vervolgens de bewerking volgens de bovenstaande stappen toepassen.


Office Tab - Browsen met tabbladen, bewerken en beheren van werkmappen in Excel:

Office-tabblad brengt de interface met tabbladen zoals te zien in webbrowsers zoals Google Chrome, nieuwe versies van Internet Explorer en Firefox naar Microsoft Excel. Het zal een tijdbesparende tool zijn en onherroepelijk in uw werk. Zie onderstaande demo:

Klik voor gratis proefversie van Office Tab!

Office-tabblad voor Excel


Verwijder rij als cel nul bevat met Kutools voor Excel

Kutools for Excel bevat meer dan handige Excel-gereedschappen van 300. Gratis om te proberen zonder beperking in 60-dagen. Download de gratis proefversie nu!


Relatieve artikelen:


Kutools voor Excel - De beste Office-productiviteitstool Verhoog uw productiviteit met 80%

  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen en gegevens bewaren; Inhoud gesplitste cellen; Combineer dubbele rijen en som / gemiddelde... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • Favoriete en snel formules invoegen, Bereiken, grafieken en afbeeldingen; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Werkt met Office 2007-2019 en 365 en ondersteunt alle talen. Het is eenvoudig te implementeren in uw bedrijf. Volledige functionaliteit 60-daagse gratis proefversie.
kte-tab 201905

Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

  • Bewerken en lezen met tabbladen inschakelen in Word, Excel, PowerPoint, 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 verlaagt dagelijks honderden muisklikken voor u!
Officetab onderaan
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Guest · 6 months ago
    Insert this in VB new module.
    This is with InputBox to delete row which contains that word.

    Attribute VB_Name = "FindDelRowByWord"
    Sub FindDelRow()
    'Updateby20140616
    Dim Rng As Range
    Dim WorkRng As Range
    Dim xRep As String
    On Error Resume Next
    xTitleId = "ZOK Tools"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
    xRep = Application.InputBox("word to delete Row:", "ZOK Tools", , , , , 2)
    Application.ScreenUpdating = False
    Do
    Set Rng = WorkRng.Find(xRep, LookIn:=xlValues)
    If Not Rng Is Nothing Then
    Rng.EntireRow.Delete
    End If
    Loop While Not Rng Is Nothing
    Application.ScreenUpdating = True
    End Sub
    • To post as a guest, your comment is unpublished.
      AndrewRosales · 6 months ago
      WHAT IF you have a big sheet, and there are rows you want to keep, and others rows that contain certain key words and delete those? the kutools work for me but for one key word that many rows have that key word, the rows were deleted, i just want to have multiple key words to do the same? does this work for the code above?
      • To post as a guest, your comment is unpublished.
        crystal · 6 months ago
        Good Day,
        Kutools can deal with two key words at the same time. You need to enable its second condition with "And" or "Or". Hope I can help.
  • To post as a guest, your comment is unpublished.
    Sheri · 2 years ago
    This didn't work for me. It changed all values in my chosen column and the adjacent column to zeros. I must be doing something wrong!
    • To post as a guest, your comment is unpublished.
      crystal · 6 months ago
      Hi Sheri,
      The code works well in my case. Which Excel verson do you use?
      • To post as a guest, your comment is unpublished.
        Sheri Dohm · 6 months ago
        Hi Crystal. I posted this two years ago so I’m guessing I figured it out. But thanks for the reply.
  • To post as a guest, your comment is unpublished.
    R. Arunkumar · 2 years ago
    Hi dears ,

    I need a code to hide the rows which have the value=0 on the column "N" in the sheet 1. The value of the column "N" will change when update the details on the Sheet 2.
    that's the time need to un-hide the row. is this possible to do this with Excel formula(without macro and Excel Filters).
  • To post as a guest, your comment is unpublished.
    J Murphy · 3 years ago
    modified for my purpose--thank you for your help:
    Sub DeleteZeroRow()
    Dim Rng As Range
    Dim WorkRng As Range
    On Error Resume Next
    xTitleId = ""
    Application.Calculation = xlManual
    MsgBox "Set the range you want to remove the unused 0 quantity rows from"
    Set WorkRng = Application.InputBox("Range", xTitleId, "FG93:FG500", Type:=8)
    Application.ScreenUpdating = False
    Sheets("ENTRY").Select
    Do
    Set Rng = WorkRng.Find("0", LookIn:=xlValues)
    If Not Rng Is Nothing Then
    Rng.EntireRow.Delete
    End If
    Loop While Not Rng Is Nothing
    Application.ScreenUpdating = True
    Range("FF92").Select
    Selection.End(xlDown).Select
    MsgBox "Removed 0's ROWS from column FG--calculating now--please wait"
    Application.Calculation = xlAutomatic
    End Sub
  • To post as a guest, your comment is unpublished.
    Andrew · 3 years ago
    I modified the below code to work for me. This deleted every row in column C that had "Delete" in the cell of column C.

    Sub Delete_DeleteRows()

    Set WorkRng = Range("C2:C12000")

    Application.ScreenUpdating = False

    Do

    Set Rng = WorkRng.Find("Delete", LookIn:=xlValues)
    If Not Rng Is Nothing Then
    Rng.EntireRow.Delete
    End If

    Loop While Not Rng Is Nothing
    Application.ScreenUpdating = True

    End Sub
  • To post as a guest, your comment is unpublished.
    Andrew · 3 years ago
    I modified the above code to work for me. I wanted to delete every row that had "Delete" in row C.

    Sub Delete_DeleteRows()

    Set WorkRng = Range("C2:C12000")

    Application.ScreenUpdating = False

    Do

    Set Rng = WorkRng.Find("Delete", LookIn:=xlValues)
    If Not Rng Is Nothing Then
    Rng.EntireRow.Delete
    End If

    Loop While Not Rng Is Nothing
    Application.ScreenUpdating = True

    End Sub
  • To post as a guest, your comment is unpublished.
    Scott · 4 years ago
    Your VB code doesn't work. It deletes all rows with a Zero in the 10s position. I hope no one actually uses this as they will delete data...
  • To post as a guest, your comment is unpublished.
    Tom B · 4 years ago
    This was a life saver!!