Slik sletter du tomme rader i Excel med VBA, formler og Power Query

  • Dele Denne
Michael Brown

Denne opplæringen vil lære deg noen enkle triks for å slette flere tomme rader i Excel trygt uten å miste en eneste bit informasjon .

Blanke rader i Excel er et problem vi alle står overfor en gang i blant, spesielt når du kombinerer data fra forskjellige kilder eller importerer informasjon fra et annet sted. Tomme linjer kan forårsake mye kaos for regnearkene dine på forskjellige nivåer, og å slette dem manuelt kan være en tidkrevende og feilutsatt prosess. I denne artikkelen vil du lære noen enkle og pålitelige metoder for å fjerne blanke i regnearkene dine.

    Hvordan IKKE fjerne tomme linjer i Excel

    Det er noen få forskjellige måter å slette tomme linjer i Excel, men overraskende mange nettressurser holder seg til den farligste, nemlig Finn & Velg > Gå til spesial > Blanks .

    Hva er galt med denne teknikken? Den velger alle tomme felt i et område, og du vil følgelig ende opp med å slette alle rader som inneholder så mye som en enkelt tom celle.

    Bildet nedenfor viser den opprinnelige tabellen til venstre og den resulterende tabellen til høyre. Og i den resulterende tabellen er alle ufullstendige rader borte, til og med rad 10 der bare datoen i kolonne D manglet:

    Den nederste linjen: hvis du ikke vil rote til dataene dine, må du aldri slette tom rader ved å velge tomme celler. Bruk i stedet en av de mer gjennomtenkte tilnærmingene som er diskutertgjøre ting mer komplekse enn de trenger å være. Så vi tok et skritt videre og opprettet en to-klikksrute for å slette tomme rader i Excel.

    Med Ultimate Suite lagt til på båndet ditt kan du slette alle tomme rader . i et regneark:

    1. I kategorien Ablebits Tools , i Transform -gruppen, klikker du Slett blanks > Tomme rader :
    2. Tillegget vil informere deg om at alle tomme rader skal fjernes fra det aktive regnearket og ber om å bekrefte. Klikk OK, og om et øyeblikk vil alle tomme rader bli eliminert.

    Som vist på skjermbildet nedenfor, har vi bare fjernet absolutt tomme linjer som ikke har en eneste celle med data:

    For å finne ut flere fantastiske funksjoner inkludert i Ultimate Suite for Excel, er du velkommen til å laste ned en prøveversjon.

    Jeg takker for at du leser og håper å se deg på bloggen vår neste uke!

    nedenfor.

    Hvordan fjerne tomme rader i Excel med VBA

    Excel VBA kan fikse mange ting, inkludert flere tomme rader. Det beste med denne tilnærmingen er at den ikke krever noen programmeringskunnskaper. Bare ta en av kodene nedenfor og kjør den i Excel (instruksjonene er her).

    Makro 1. Slett tomme linjer i et valgt område

    Denne VBA-koden sletter stille alle tomme linjer rader i et valgt område, uten å vise noen melding eller dialogboks til brukeren.

    I motsetning til den forrige teknikken, sletter makroen en linje hvis hele raden er tom . Den er avhengig av regnearkfunksjonen CountA for å få antall ikke-tomme celler i hver linje, og sletter deretter rader med nullantall.

    Public Sub DeleteBlankRows() Dim SourceRange As Range Dim EntireRow As Range Set SourceRange = Application. Selection If Not (SourceRange Is Nothing ) Then Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step -1 Sett EntireRow = SourceRange.Cells(I, 1).EntireRow If Application.WorksheetFunction.CountA(EntireRow) = 0 Then EntireRow.Delete End If Next Application.ScreenUpdating = True End If End Sub

    For å gi brukeren en mulighet til å velge målområdet etter å ha kjørt makroen , bruk denne koden:

    Offentlig Sub RemoveBlankLines() Dim SourceRange As Range Dim EntireRow As Range Ved feil Fortsett Neste Sett SourceRange = Application.InputBox( _"Velg et område:" , "Slett tomme rader" , _ Application.Selection.Address, Type :=8) Hvis ikke (SourceRange Is Nothing ) Then Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step - 1 Sett EntireRow = SourceRange.Cells(I, 1).EntireRow If Application.WorksheetFunction.CountA(EntireRow) = 0 Then EntireRow.Delete End If Next Application.ScreenUpdating = True End If End Sub

    Ved kjøring viser makroen følgende inndataboks, velger du målområdet og klikker OK:

    Om et øyeblikk vil alle tomme linjer i det valgte området bli eliminert og de resterende vil skifte opp:

    Makro 2. Slett alle tomme rader i Excel

    For å fjerne alle tomme rader på det aktive arket , bestemmer du den siste raden i det brukte området (dvs. raden som inneholder siste celle med data), og gå deretter oppover og slett linjene som CountA returnerer null for:

    Sub DeleteAllEmptyRows() Dim LastRowIndex As Integer Dim RowIndex As Integer Dim UsedRng As Range Set UsedRng = Activ eSheet.UsedRange LastRowIndex = UsedRng.Row - 1 + UsedRng.Rows.Count Application.ScreenUpdating = False For RowIndex = LastRowIndex To 1 Step -1 If Application.CountA(Rows(RowIndex)) = 0 Then Rows(RowIn Enddex). If Next RowIndex Application.ScreenUpdating = True End Sub

    Makro 3. Slett rad hvis cellen er tom

    Med denne makroen kan du slette en hel rad hvis en celle i den spesifisertekolonnen er tom.

    Følgende kode sjekker kolonne A for tomrom. For å slette rader basert på en annen kolonne, erstatt "A" med en passende bokstav.

    Sub DeleteRowIfCellBlank() Ved feil Fortsett Neste Columns( "A" ).SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub

    Som en Faktisk bruker makroen funksjonen Gå til spesial > Blanks , og du kan oppnå samme resultat ved å utføre disse trinnene manuelt.

    Merk. Makroen sletter tomme rader i hele arket , så vær veldig forsiktig når du bruker den. Som en forholdsregel kan det være lurt å sikkerhetskopiere regnearket før du kjører denne makroen.

    Hvordan fjerne tomme linjer i Excel med VBA

    For å slette tomme rader i Excel ved hjelp av en makro, må du kan enten sette inn VBA-koden i din egen arbeidsbok eller kjøre en makro fra eksempelarbeidsboken vår.

    Legg til en makro i arbeidsboken

    For å sette inn en makro i arbeidsboken, utfør disse trinnene:

    1. Åpne regnearket der du vil slette tomme rader.
    2. Trykk Alt + F11 for å åpne Visual Basic Editor.
    3. I venstre rute, høyreklikk ThisWorkbook , og klikk deretter Sett inn > Module .
    4. Lim inn koden i kodevinduet.
    5. Trykk F5 for å kjøre makroen.

    For detaljerte trinnvise instruksjoner, se Hvordan sette inn og bruke VBA i Excel.

    Kjør en makro fra eksempelarbeidsboken vår

    Last ned prøven vårarbeidsbok med makroer for å slette tomme rader og kjøre en av følgende makroer derfra:

    DeleteBlankRows - fjerner tomme rader i det valgte området.

    RemoveBlankLines - sletter tomme rader og skifter opp i et område du velger etter å ha kjørt makroen.

    SlettAllEmptyRows - sletter alle tomme linjer på det aktive arket.

    DeleteRowIfCellBlank - sletter en rad hvis en celle i en bestemt kolonne er tom.

    For å kjøre makroen i Excel, gjør følgende:

    1. Åpne lastet ned arbeidsbok og aktiver makroene hvis du blir bedt om det.
    2. Åpne din egen arbeidsbok og naviger til arbeidsarket av interesse.
    3. I regnearket ditt, trykk Alt + F8, velg makroen og klikk Kjør .

    Formel for å slette tomme rader i Excel

    Hvis du vil se hva du sletter, bruk følgende formel for å identifisere tomme linjer:

    =IF(COUNTA(A2:D2)=0, "Blank", "Not blank")

    Hvor A2 er den første og D2 er den sist brukte cellen i den første dataraden.

    Skriv inn denne formelen a i E2 eller en annen tom kolonne i rad 2, og dra fyllhåndtaket for å kopiere formelen ned.

    Som et resultat vil du ha "Blank" i tomme rader og "Ikke blank" i radene som inneholder minst én celle med data:

    Formelens logikk er åpenbar: du teller ikke-tomme celler med COUNTA-funksjonen og bruker IF-setningen for å returnere "Blank" for null telling, "Not Blank" ellers .

    Ifaktisk kan du klare deg fint uten IF:

    =COUNTA(A2:D2)=0

    I dette tilfellet vil formelen returnere TRUE for tomme linjer og FALSE for ikke-blanke linjer.

    Med formel på plass, utfør disse trinnene for å slette tomme linjer:

    1. Velg en hvilken som helst celle i overskriftsraden og klikk Sorter & Filter > Filter i kategorien Hjem , i Formater . Dette vil legge til rullegardinpilene for filtrering i alle overskriftsceller.
    2. Klikk på pilen i formelkolonneoverskriften, fjern merket (Velg alle), velg Blank og klikk OK :
    3. Velg alle de filtrerte radene . For dette, klikk på den første cellen i den første filtrerte raden og trykk Ctrl + Shift + End for å utvide utvalget til den siste cellen i den sist filtrerte raden.
    4. Høyreklikk på utvalget, velg Slett rad fra kontekstmenyen, og bekreft deretter at du virkelig ønsker å slette hele rader:
    5. Fjern filteret ved å trykke Ctrl + Shift + L . Eller klikk Hjem -fanen > Sorter & Filter > Filter .
    6. Slett kolonnen med formelen siden du ikke trenger den lenger.

    Det er det! Som et resultat har vi en ren tabell uten tomme linjer, men all informasjon bevart:

    Tips. I stedet for å slette tomme linjer, kan du kopiere ikke-tomme rader til et annet sted. For å få det gjort, filtrer "Ikke tomme" rader, velg dem og trykk Ctrl + C for å kopiere. Bytt deretter tilet annet ark, velg cellen øverst til venstre i målområdet og trykk Ctrl + V for å lime inn.

    Hvordan fjerne tomme linjer i Excel med Power Query

    I Excel 2016 og Excel 2019, det er en annen måte å slette tomme rader på - ved å bruke Power Query-funksjonen. I Excel 2010 og Excel 2013 kan den lastes ned som et tillegg.

    Viktig merknad! Denne metoden fungerer med følgende forbehold: Power Query konverterer kildedataene til en Excel-tabell og endrer formateringen som fyllfarge, kantlinjer og enkelte tallformater. Hvis formateringen av originaldataene dine er viktig for deg, bør du velge en annen måte å fjerne tomme rader i Excel på.

    1. Velg området der du vil slette tomme linjer.
    2. Gå til Data -fanen > Hent & Transformer -gruppen og klikk Fra tabell/område . Dette vil laste inn tabellen til Power Query Editor.
    3. I kategorien Hjem i Power Query Editor klikker du på Fjern rader > Fjern tomme rader .
    4. Klikk Lukk & Last inn Dette vil laste den resulterende tabellen til et nytt regneark og lukke spørringsredigering.

    I resultatet av disse manipulasjonene fikk jeg følgende tabell uten tomme linjer, men med et par stygge endringer - valutaformatet er tapt og datoene vises i standardformatet i stedet for den egendefinerte:

    Hvordan slette rader hviscelle i en bestemt kolonne er tom

    I begynnelsen av denne opplæringen advarte vi deg mot å fjerne tomme linjer ved å velge tomme felter. Denne metoden er imidlertid nyttig hvis du ønsker å slette rader basert på blanke felter i en spesifikk kolonne .

    La oss som et eksempel fjerne alle radene der en celle i kolonne A er tom :

    1. Velg nøkkelkolonnen, kolonne A i vårt tilfelle.
    2. På kategorien Hjem klikker du Finn & Velg > Gå til spesial . Eller trykk på F5 og klikk på Spesial... -knappen.
    3. I dialogboksen Gå til spesial velger du Blanker og klikker OK . Dette vil velge tomme celler i det brukte området i kolonne A.
    4. Høyreklikk på en valgt celle og velg Slett... fra hurtigmenyen.
    5. I dialogboksen Slett velger du Hele rad og klikker OK.

    Ferdig! Radene som ikke har en verdi i kolonne A er ikke lenger der:

    Samme resultat kan oppnås ved å filtrere tomme felter i nøkkelkolonnen.

    Hvordan fjerne ekstra linjer under data

    Noen ganger kan radene som ser helt tomme ut faktisk inneholde noen formater eller ikke-utskrivbare tegn. For å sjekke om den siste cellen med data virkelig er den sist brukte cellen i regnearket ditt, trykk Ctrl + End . Hvis dette har tatt deg til en visuelt tom rad under dataene dine, i form av Excel, er ikke den raden tom. For å fjerne slike rader, gjør dufølgende:

    1. Klikk på overskriften på den første tomme raden under dataene dine for å velge den.
    2. Trykk Ctrl + Shift + End . Dette vil velge alle linjene som inneholder alt, inkludert formater, mellomrom og tegn som ikke skrives ut.
    3. Høyreklikk på utvalget og velg Slett... > Hele raden.

    Hvis du har et relativt lite datasett, kan det være lurt å kvitte seg med alle tomme linjer under dataene dine, f.eks. for å gjøre rulling enklere. Selv om det ikke er noen måte å slette ubrukte rader i Excel, er det ingenting som hindrer deg i å gjemme dem. Slik gjør du det:

    1. Velg raden under den siste raden med data ved å klikke på overskriften.
    2. Trykk Ctrl + Shift + Pil ned for å utvide utvalget til den siste raden på arket .
    3. Trykk Ctrl + 9 for å skjule de valgte radene. Eller høyreklikk på utvalget, og klikk deretter Skjul .

    For å vise radene , trykk Ctrl + A for å velge hele arket, og trykk deretter Ctrl + Shift + 9 for å gjøre alle linjene synlige igjen.

    På lignende måte kan du skjule ubrukte tomme kolonner til høyre for dataene dine. For detaljerte trinn, se Skjul ubrukte rader i Excel slik at bare arbeidsområdet er synlig.

    Raskeste måten å fjerne tomme rader i Excel

    Når du leser de forrige eksemplene, gjorde det ikke det føler vi at vi brukte en slegge til å knekke en nøtt? Her, på Ablebits, foretrekker vi å la være

    Michael Brown er en dedikert teknologientusiast med en lidenskap for å forenkle komplekse prosesser ved hjelp av programvareverktøy. Med mer enn ti års erfaring i teknologibransjen, har han forbedret ferdighetene sine i Microsoft Excel og Outlook, samt Google Sheets og Docs. Michaels blogg er dedikert til å dele sin kunnskap og ekspertise med andre, og gir enkle å følge tips og veiledninger for å forbedre produktivitet og effektivitet. Enten du er en erfaren profesjonell eller nybegynner, tilbyr Michaels blogg verdifull innsikt og praktiske råd for å få mest mulig ut av disse viktige programvareverktøyene.