Note: The other languages of the website are Google-translated. Back to English

Hvordan slettes hele rækken, hvis cellen indeholder nul i Excel?

Nogle gange vil du slette hele rækken, hvis cellen indeholder nul i Excel, og du kan slette dem en efter en, hvis der er et par af dem. Men hvad med hundreder af rækker, der indeholder nul, skulle fjernes? Du kan vælge en af ​​de vanskelige måder nedenfor for at løse det.

Slet række, hvis celle indeholder nul med filterfunktion i Excel
Slet række, hvis celle indeholder nul med VBA i Excel
Slet række, hvis cellen indeholder nul med Kutools til Excel


Slet række, hvis celle indeholder nul med filterfunktion i Excel

Du kan bruge filterfunktionen til at filtrere alle rækker ud fra nulværdierne i en bestemt kolonne og derefter slette alle synlige rækker senere. Gør som følger.

1. Vælg de søjleceller, der indeholder de nulværdier, du vil slette hele rækkerne baseret på, og klik derefter på data > filtre. Se skærmbillede:

2. Derefter vises en rullemenu i den første celle i den valgte kolonne, klik på pilen og vælg derefter Antal filtre > Lig fra rullelisten.

doc slet, hvis nul 1

3. i Brugerdefineret autofilter dialogboks, indtast nummer 0 i tekstboksen som vist nedenstående skærmbillede, og klik derefter på OK .

doc slet, hvis nul 1

4. Derefter filtreres alle nulværdieceller i denne bestemte kolonne ud. Vælg alle synlige celler i filterområdet, og højreklik på dem, vælg Slet rækker fra højreklikmenuen. Og i boksen med pop op-meddelelse skal du klikke på OK knap. Se skærmbillede:

doc slet, hvis nul 1

5. Nu slettes alle synlige rækker. Du kan klikke data > filtre igen for at vise alle data uden celler med nulværdi. Se skærmbillede:

doc slet, hvis nul 1


Slet let alle rækker, hvis der findes nulværdier i et bestemt interval i Excel:

Kutools til Excel Vælg specifikke celler hjælpeprogram hjælper dig med nemt at vælge hele rækker, hvis der findes nulværdier i et bestemt område, og derefter kan du hurtigt slette alle valgte rækker manuelt uden fejl.
Download og prøv det nu! (30-dages gratis sti)


Slet række, hvis celle indeholder nul med VBA i Excel

Dette afsnit viser dig VBA-metoden til at slette alle rækker, hvis der findes nulværdier i en bestemt kolonne i Excel.

1. Trykke Alt + F11 taster samtidigt for at få vist Microsoft Visual Basic til applikationer vindue.

2. Klik på i vinduet Microsoft Visual Basic til applikationer indsatte > Moduler, kopier og indsæt derefter følgende VBA-kode i modulvinduet.

VBA: Slet hele rækker, hvis der findes nulværdi i et bestemt kolonneområde i et regneark

Sub DeleteZeroRow () 'Updateby20140616 Dim Rng Som 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 = Falsk Indstil Rng = WorkRng.Find ("0", LookIn: = xlValues) Hvis ikke Rng er intet, så Rng.EntireRow. Slet slut, hvis sløjfe, mens ikke Rng, er intet Application.ScreenUpdating = True End Sub

3. Tryk på F5 nøgle til at køre koden, når den dukker op KutoolsforExcel Vælg det kolonneområde, du vil slette hele rækker, baseret på nulværdierne indeni, og klik derefter på OK knap. Se skærmbillede:

doc slet, hvis nul 1

Derefter slettes alle rækker baseret på nulværdierne i det angivne kolonneområde straks.

doc slet, hvis nul 1


Slet række, hvis cellen indeholder nul med Kutools til Excel

For mange Excel-brugere er det farligt at bruge VBA-kode for at fjerne data i Excel. Hvis du ikke nøjagtigt har tillid til VBA-koden, anbefaler vi dig her at prøve Vælg specifikke celler nytte af Kutools til Excel.

Før påføring Kutools til Excel, Bedes download og installer det først.

1. Vælg det kolonneområde, du vil fjerne hele rækker baseret på nulværdierne indeni, og klik derefter på Kutools > Type > Vælg specifikke celler. Se skærmbillede:

2. i Vælg specifikke celler dialog, skal du:

(1) Vælg Hele rækken valgmulighed i Valgtype sektion.

(2) Vælg Lig først og fremmest Specifik type rulleliste, og indtast derefter nummer 0 ind i tekstboksen.

(3) Klik på OK .

3. Der vises en dialogboks, der fortæller dig, hvor mange rækker der er valgt, klik på OK knap. Nu er alle rækker med nulværdierne i det angivne kolonneområde valgt. Højreklik til en hvilken som helst valgt række, og klik derefter på Slette i højreklikmenuen. Se skærmbillede:

doc slet, hvis nul 1

Nu findes alle rækker med nulværdier i den angivne kolonne straks. Se skærmbillede:

doc slet, hvis nul 1

  Hvis du vil have en gratis prøveperiode (30-dag) for dette værktøj, klik for at downloade det, og gå derefter til at anvende handlingen i henhold til ovenstående trin.


Slet række, hvis cellen indeholder nul med Kutools til Excel


Relative artikler:


De bedste Office-produktivitetsværktøjer

Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%

  • Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2021 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60 dages pengene tilbage garanti.
kte-fane 201905

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
officetab bund
Sorter kommentarer efter
Kommentarer (15)
Ingen vurderinger endnu. Vær den første til at bedømme!
Denne kommentar blev minimeret af moderatoren på webstedet
Dette var en livredder!!
Denne kommentar blev minimeret af moderatoren på webstedet
Din VB-kode virker ikke. Den sletter alle rækker med et nul i 10'er-positionen. Jeg håber, at ingen rent faktisk bruger dette, da de vil slette data...
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg ændrede ovenstående kode til at virke for mig. Jeg ønskede at slette hver række, der havde "Delete" i række C. Sub Delete_DeleteRows() Set WorkRng = Range("C2:C12000") Application.ScreenUpdating = False Do Set Rng = WorkRng.Find("Delete", LookIn:= xlValues) Hvis ikke Rng er ingenting, så Rng.EntireRow.Delete End If Loop, mens Rng ikke er noget Application.ScreenUpdating = True End Sub
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg ændrede nedenstående kode til at virke for mig. Dette slettede hver række i kolonne C, der havde "Delete" i cellen i kolonne C. Sub Delete_DeleteRows() Set WorkRng = Range("C2:C12000") Application.ScreenUpdating = False Do Set Rng = WorkRng.Find("Delete" , LookIn:=xlValues) Hvis ikke Rng er ingenting, så Rng.EntireRow.Delete End If Loop Mens Ikke Rng er ingenting Application.ScreenUpdating = True End Sub
Denne kommentar blev minimeret af moderatoren på webstedet
tak for svaret, virkede for mig
Denne kommentar blev minimeret af moderatoren på webstedet
Hej,
det virkede for mig, mange tak.
hvis jeg har flere ark? hvordan kan jeg køre scriptet 1 gang for alle arkene?
Denne kommentar blev minimeret af moderatoren på webstedet
modificeret til mit formål - tak for din hjælp: Sub DeleteZeroRow() Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "" Application.Calculation = xlManual MsgBox "Indstil det interval, du vil fjerne den ubrugte 0-mængde rækker fra" Set WorkRng = Application.InputBox("Range", xTitleId, "FG93:FG500", Type:=8) Application.ScreenUpdating = False Sheets("ENTRY").Vælg 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").Vælg Selection.End(xlDown).Vælg MsgBox "Removed" 0'er RÆKKER fra kolonne FG--beregner nu--vent venligst" Application.Calculation = xlAutomatic End Sub
Denne kommentar blev minimeret af moderatoren på webstedet
Hej kære, jeg har brug for en kode til at skjule rækkerne, der har værdien = 0 i kolonnen "N" i ark 1. Værdien af ​​kolonnen "N" ændres, når detaljerne på ark 2 opdateres. det er på tide nødt til at åbne rækken. er dette muligt at gøre dette med Excel-formel (uden makro og Excel-filtre).
Denne kommentar blev minimeret af moderatoren på webstedet
Dette virkede ikke for mig. Det ændrede alle værdier i min valgte kolonne og den tilstødende kolonne til nuller. Jeg må gøre noget forkert!
Denne kommentar blev minimeret af moderatoren på webstedet
Hej Sheri,
Koden fungerer godt i mit tilfælde. Hvilken Excel-version bruger du?
Denne kommentar blev minimeret af moderatoren på webstedet
Hej Crystal. Jeg postede dette for to år siden, så jeg gætter på, at jeg fandt ud af det. Men tak for svaret.
Denne kommentar blev minimeret af moderatoren på webstedet
Indsæt dette i VB nyt modul.
Dette er med InputBox for at slette række, der indeholder det ord.

Attribut VB_Name = "FindDelRowByWord"
Sub FindDelRow()
'Opdatering senest 20140616
Dim Rng Som Range
Dæmp WorkRng As Range
Dim xRep som streng
On Error Resume Next
xTitleId = "ZOK Tools"
Indstil WorkRng = Application.Selection
Indstil WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xRep = Application.InputBox("ord til at slette række:", "ZOK Tools", , , , , 2)
Application.ScreenUpdating = False
Do
Indstil Rng = WorkRng.Find(xRep, LookIn:=xlValues)
Hvis ikke Rng er ingenting så
Rng.EntireRow.Delete
End If
Loop Mens Ikke Rng Er Intet
Application.ScreenUpdating = True
End Sub
Denne kommentar blev minimeret af moderatoren på webstedet
HVAD HVIS du har et stort ark, og der er rækker, du vil beholde, og andre rækker, der indeholder bestemte nøgleord og sletter dem? kutools virker for mig, men for et nøgleord, som mange rækker har det nøgleord, blev rækkerne slettet, jeg vil bare have flere nøgleord for at gøre det samme? virker dette for koden ovenfor?
Denne kommentar blev minimeret af moderatoren på webstedet
Good Day,
Kutools kan håndtere to nøgleord på samme tid. Du skal aktivere dens anden betingelse med "Og" eller "Eller". Håber jeg kan hjælpe.
Denne kommentar blev minimeret af moderatoren på webstedet
Undladelse af udnyttelse af subtotal Como harcer para eliminar las filas involucradas que en el subtotal es igual a 0?
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder

Følg os

Copyright © 2009 - www.extendoffice.com. | Alle rettigheder forbeholdes. Drevet af ExtendOffice. | | Sitemap
Microsoft og Office-logoet er varemærker eller registrerede varemærker tilhørende Microsoft Corporation i USA og / eller andre lande.
Beskyttet af Sectigo SSL