V tem priročniku boste spoznali nekaj preprostih trikov za varno brisanje več praznih vrstic v Excelu, ne da bi izgubili en sam podatek. .

Prazne vrstice v Excelu so težava, s katero se občasno srečamo vsi, zlasti pri združevanju podatkov iz različnih virov ali uvozu informacij od drugod. Prazne vrstice lahko na različnih ravneh povzročijo veliko škodo v delovnih listih, njihovo ročno brisanje pa je lahko dolgotrajen in na napake nagnjen postopek. V tem članku boste spoznali nekaj preprostih in zanesljivih metod za odstranjevanje praznih vrstic vdelovne liste.

Kako NE odstraniti praznih vrstic v programu Excel

Obstaja več različnih načinov brisanja praznih vrstic v Excelu, vendar se presenetljivo veliko spletnih virov drži najnevarnejšega, in sicer Poišči & amp; Izberite > Pojdi na poseben > Prazni deli .

Kaj je narobe s to tehniko? Izbere vsi prazni izdelki v območju, zato boste na koncu izbrisali vse vrstice, ki vsebujejo le eno prazno celico.

Spodnja slika prikazuje izvirno tabelo na levi in dobljeno tabelo na desni. V dobljeni tabeli ni več vseh nepopolnih vrstic, celo vrstice 10, kjer manjka samo datum v stolpcu D:

Če ne želite zmešati podatkov, nikoli ne brišite praznih vrstic z izbiranjem praznih celic. Namesto tega uporabite enega od bolj premišljenih pristopov, opisanih v nadaljevanju.

Kako odstraniti prazne vrstice v Excelu z VBA

Excel VBA lahko popravi marsikaj, tudi več praznih vrstic. Najboljše pri tem pristopu je, da ne zahteva nobenih programerskih spretnosti. Preprosto vzemite eno od spodnjih kod in jo zaženite v Excelu (navodila so tukaj).

Makro 1. Brisanje praznih vrstic v izbranem območju

Ta koda VBA tiho izbriše vse prazne vrstice v izbranem območju, ne da bi uporabniku prikazala kakršno koli sporočilo ali pogovorno okno.

V nasprotju s prejšnjo tehniko makro izbriše vrstico, če je celotna vrstica je prazna Pri tem se zanaša na funkcijo delovnega lista CountA, ki določa število nepraznih celic v vsaki vrstici, nato pa izbriše vrstice z ničelnim številom.

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 Set 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

Uporabniku omogočiti, da izbrati ciljno območje po zagonu makra , uporabite to kodo:

Public Sub RemoveBlankLines() Dim SourceRange As Range Dim EntireRow As Range On Error Resume Next Set SourceRange = Application.InputBox( _ "Select a range:" , "Delete Blank Rows" , _ Application.Selection.Address, Type :=8) If Not (SourceRange Is Nothing ) Then Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step -1 Set EntireRow = SourceRange.Cells(I, 1).EntireRow IfApplication.WorksheetFunction.CountA(EntireRow) = 0 Then EntireRow.Delete End If Next Application.ScreenUpdating = True End If End Sub

Ob zagonu makro prikaže naslednje vnosno polje, izberete ciljno območje in kliknete OK:

V trenutku bodo odstranjene vse prazne vrstice v izbranem območju, preostale pa se bodo premaknile navzgor:

Makro 2. Brisanje vseh praznih vrstic v programu Excel

Odstranitev vse prazne vrstice na aktivni list , določite zadnjo vrstico uporabljenega območja (tj. vrstico, ki vsebuje zadnjo celico s podatki) in nato pojdite navzgor ter izbrišite vrstice, za katere je rezultat CountA enak nič:

Sub DeleteAllEmptyRows() Dim LastRowIndex As Integer Dim RowIndex As Integer Dim UsedRng As Range Set UsedRng = ActiveSheet.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(RowIndex).Delete End If Next RowIndex Application.ScreenUpdating = True End Sub

Makro 3. Izbriši vrstico, če je celica prazna

S tem makrom lahko izbrišete celotno vrstico, če je celica v določenem stolpcu prazna.

Naslednja koda preverja stolpec A za prazne vrstice. Če želite izbrisati vrstice na podlagi drugega stolpca, zamenjajte "A" z ustrezno črko.

Sub DeleteRowIfCellBlank() On Error Resume Next Columns( "A" ).SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub

Pravzaprav makro uporablja Pojdi na poseben > Prazni deli in enak rezultat lahko dosežete z ročnim izvajanjem teh korakov.

Opomba: Makro izbriše prazne vrstice v celoten list Zato bodite pri njegovi uporabi zelo previdni. Preden zaženete ta makro, je morda pametno narediti varnostno kopijo delovnega lista.

Kako odstraniti prazne vrstice v Excelu z VBA

Če želite z makrom izbrisati prazne vrstice v Excelu, lahko kodo VBA vstavite v svoj delovni zvezek ali zaženete makro iz našega vzorčnega delovnega zvezka.

Dodajanje makra v delovni zvezek

Če želite vstaviti makro v delovni zvezek, naredite naslednje korake:

1. Odprite delovni list, v katerem želite izbrisati prazne vrstice.
2. Pritisnite Alt + F11, da odprete urejevalnik Visual Basic.
3. V levem podoknu z desno tipko miške kliknite Ta delovna knjiga in nato kliknite Vstavite > Modul .
4. Kodo prilepite v okno Koda.
5. Za zagon makra pritisnite F5.

Za podrobna navodila po korakih glejte Kako vstaviti in uporabljati VBA v Excelu.

Zaženite makro iz našega vzorčnega delovnega zvezka

Prenesite naš vzorčni delovni zvezek z makri za brisanje praznih vrstic in v njem zaženite enega od naslednjih makrov:

DeleteBlankRows - odstrani prazne vrstice v trenutno izbranem območju.

RemoveBlankLines - izbriše prazne vrstice in premakne navzgor v območju, ki ga izberete po zagonu makra.

DeleteAllEmptyRows - izbriše vse prazne vrstice na aktivnem listu.

DeleteRowIfCellBlank - izbriše vrstico, če je celica v določenem stolpcu prazna.

Če želite zagnati makro v Excelu, naredite naslednje:

1. Odprite preneseni delovni zvezek in po pozivu omogočite makre.
2. Odprite svoj delovni zvezek in se pomaknite do delovnega lista, ki vas zanima.
3. V delovnem listu pritisnite kombinacijo tipk Alt + F8, izberite makro in kliknite Spustite .

Formula za brisanje praznih vrstic v Excelu

Če želite videti, kaj izbrišete, uporabite naslednjo formulo za prepoznavanje praznih vrstic:

=IF(COUNTA(A2:D2)=0, "Prazno", "Ni prazno")

Pri čemer je A2 prva in D2 zadnja uporabljena celica prve podatkovne vrstice.

To formulo vnesite v E2 ali kateri koli drug prazen stolpec v vrstici 2 in povlecite ročico za zapolnitev, da kopirate formulo navzdol.

Rezultat tega je, da bodo prazne vrstice prazne, vrstice, ki vsebujejo vsaj eno celico s podatki, pa prazne:

Logika formule je očitna: s funkcijo COUNTA preštejete neprazne celice in s stavkom IF vrnete "Prazno" za ničelno število, v nasprotnem primeru pa "Ni prazno".

Pravzaprav se lahko brez IF dobro znajdete:

=COUNTA(A2:D2)=0

V tem primeru bo formula vrnila TRUE za prazne vrstice in FALSE za neprazne vrstice.

Ko imate formulo pripravljeno, v naslednjih korakih izbrišite prazne vrstice:

1. Izberite katero koli celico v vrstici z glavo in kliknite Razvrsti in filtriraj > Filter na Domov v zavihku Formati S tem boste v vse celice glave dodali spustne puščice za filtriranje.
2. Kliknite puščico v glavi stolpca formule, odstranite kljukico (Izberi vse), izberite Prazna stran in kliknite V REDU :
3. Izberite vse filtrirane vrstice. Pri tem kliknite prvo celico prve filtrirane vrstice in pritisnite kombinacijo tipk Ctrl + Shift + End, da razširite izbor do zadnje celice zadnje filtrirane vrstice.
4. Z desno tipko miške kliknite izbor in izberite Brisanje vrstice iz kontekstnega menija, nato pa potrdite, da res želite izbrisati celotne vrstice:
5. Filter odstranite tako, da pritisnete kombinacijo tipk Ctrl + Shift + L . Domov zavihek> Razvrsti in filtriraj > Filter .
6. Stolpec s formulo izbrišite, saj ga ne potrebujete več.

To je to! Rezultat je čista tabela brez praznih vrstic, vse informacije pa so ohranjene:

Namig. Namesto brisanja praznih vrstic lahko kopiranje nepraznih vrstic v drug prostor. Če želite to narediti, filtrirajte vrstice "Ni prazno", jih izberite in za kopiranje pritisnite kombinacijo tipk Ctrl + C. Nato preklopite na drug list, izberite zgornjo levo celico ciljnega območja in za prilepitev pritisnite kombinacijo tipk Ctrl + V.

Kako odstraniti prazne vrstice v Excelu s poizvedbo Power Query

V Excelu 2016 in Excelu 2019 obstaja še en način za brisanje praznih vrstic - z uporabo funkcije Power Query. V Excelu 2010 in Excelu 2013 jo lahko prenesete kot dodatek.

Pomembna opomba! Ta metoda deluje z naslednjim opozorilom: Power Query pretvori izvorne podatke v Excelovo tabelo in spremeni oblikovanje, kot so barva polnila, robovi in nekatere oblike številk. Če vam je oblikovanje izvornih podatkov pomembno, potem raje izberite drug način za odstranjevanje praznih vrstic v Excelu.

1. Izberite območje, v katerem želite izbrisati prazne vrstice.
2. Pojdite na Podatki zavihek> Get & amp; preoblikovanje in kliknite Iz tabele/območja . Tako boste v urejevalnik poizvedb Power Query Editor naložili svojo tabelo.
3. Na Domov v zavihku Urejevalnik poizvedb Power Query kliknite Odstranjevanje vrstic > Odstranjevanje praznih vrstic .
4. Kliknite na Zapri & amp; Naloži S tem se dobljena tabela naloži v nov delovni list in zapre urejevalnik poizvedb.

Rezultat teh manipulacij je naslednja tabela brez praznih vrstic, vendar z nekaj neprijetnimi spremembami - format valute je izgubljen, datumi pa so prikazani v privzetem formatu namesto v formatu po meri:

Kako izbrisati vrstice, če je celica v določenem stolpcu prazna

Na začetku tega priročnika smo vas posvarili pred odstranjevanjem praznih vrstic z izbiranjem praznih mest. Vendar ta metoda pride prav, če želite odstraniti vrstice na podlagi prazna mesta v določenem stolpcu. .

Kot primer odstranimo vse vrstice, v katerih je celica v stolpcu A prazna:

1. Izberite ključni stolpec, v našem primeru stolpec A.
2. Na Domov kliknite zavihek Poišči & amp; Izberite > Pojdi na poseben . Ali pa pritisnite tipko F5 in kliknite Posebno... gumb.
3. V Pojdi na poseben v pogovornem oknu izberite Prazni deli in kliknite V REDU To bo izbralo prazne celice v uporabljenem območju v stolpcu A.
4. Z desno tipko miške kliknite katero koli izbrano celico in izberite Izbriši... iz kontekstnega menija.
5. V Izbriši pogovorno okno, izberite Celotna vrstica in kliknite OK.

Končano! Vrstice, ki nimajo vrednosti v stolpcu A, niso več na voljo:

Enak rezultat lahko dosežete s filtriranjem praznih mest v stolpcu ključa.

Kako odstraniti dodatne vrstice pod podatki

Včasih lahko vrstice, ki so videti popolnoma prazne, v resnici vsebujejo nekatere formate ali netiskljive znake. Če želite preveriti, ali je zadnja celica s podatki res zadnja uporabljena celica v delovnem listu, pritisnite Ctrl + End . Če ste s tem prišli do vizualno prazne vrstice pod podatki, v smislu programa Excel ta vrstica ni prazna. Če želite odstraniti take vrstice, naredite naslednje:

1. Kliknite glavo prve prazne vrstice pod vašimi podatki, da jo izberete.
2. Pritisnite kombinacijo tipk Ctrl + Shift + End . Tako boste izbrali vse vrstice, ki vsebujejo kar koli, vključno s formati, presledki in netiskanimi znaki.
3. Z desno tipko miške kliknite izbor in izberite Izbriši... > Celotna vrsta.

Če imate razmeroma majhen nabor podatkov, se boste morda želeli znebiti vseh praznih vrstic pod podatki, npr. zaradi lažjega pomikanja. Čeprav v Excelu ni načina za brisanje neuporabljenih vrstic, vam nič ne preprečuje, da bi skrivanje Kako to storite:

1. Izberite vrstico pod zadnjo vrstico s podatki tako, da kliknete njeno glavo.
2. Pritisnite kombinacijo tipk Ctrl + Shift + puščica navzdol, da razširite izbor na zadnjo vrstico v listu.
3. Če želite skriti izbrane vrstice, pritisnite kombinacijo tipk Ctrl + 9. Ali pa z desno tipko miške kliknite izbrano vrstico in nato kliknite Skrij .

Na naslov odkriti vrstice , pritisnite kombinacijo tipk Ctrl + A, da izberete celoten list, nato pa pritisnite kombinacijo tipk Ctrl + Shift + 9, da bodo vse vrstice spet vidne.

Na podoben način lahko skrijete neuporabljene prazne stolpce na desni strani podatkov. Za podrobne korake glejte Skrijte neuporabljene vrstice v Excelu, da bo vidno samo delovno območje.

Najhitrejši način za odstranjevanje praznih vrstic v Excelu

Ali se vam ob branju prejšnjih primerov ni zdelo, da smo za razbitje oreha uporabili kladivo? Pri Ablebitsu raje ne delamo stvari bolj zapletenih, kot je treba. Zato smo naredili korak naprej in ustvarili način za brisanje praznih vrstic v Excelu z dvema klikoma.

Če je na trak dodan paket Ultimate Suite, lahko na naslednji način izbrišite vse prazne vrstice v delovnem listu:

1. Na Orodja Ablebits v zavihku Preoblikovanje skupino, kliknite Brisanje praznih mest > Prazne vrstice :
2. Dodatek vas bo obvestil, da bodo iz aktivnega delovnega lista odstranjene vse prazne vrstice, in vas prosil za potrditev. Kliknite V redu in čez trenutek bodo odstranjene vse prazne vrstice.

Kot je prikazano na spodnji sliki zaslona, smo odstranili samo popolnoma prazne vrstice ki nimajo niti ene celice s podatki:

Če želite izvedeti več izjemnih funkcij, vključenih v naš paket Ultimate Suite za Excel, lahko prenesete preizkusno različico.

Zahvaljujem se vam za branje in upam, da se naslednji teden vidimo na našem blogu!