Nola ezabatu errenkada hutsak Excel-en VBA, formulekin eta Power Queryrekin

  • Partekatu Hau
Michael Brown

Tutorial honek trikimailu erraz batzuk irakatsiko dizkizu Excel-en hutsik dauden hainbat errenkada modu seguruan ezabatzeko informazio pixka bat galdu gabe .

Excel-eko errenkada hutsak denok jasaten dugun arazoa da. noizean behin, batez ere iturri ezberdinetako datuak konbinatzean edo beste nonbaiteko informazioa inportatzean. Lerro hutsek hondamendi asko eragin ditzakete zure lan-orrietan maila ezberdinetan eta eskuz ezabatzeak denbora asko eta akatsak izateko joera izan dezake. Artikulu honetan, zure lan-orrietako hutsuneak kentzeko metodo sinple eta fidagarri batzuk ikasiko dituzu.

    Nola EZ kendu lerro hutsak Excel-en

    Badira batzuk. Excel-en lerro hutsak ezabatzeko modu desberdinak, baina harrigarriro sareko baliabide askok arriskutsuenarekin jarraitzen dute, hots, Bilatu & Hautatu > Joan Berezira > Hutsuneak .

    Zer dago okerra teknika honek? Barruti batean hutsune guztiak hautatzen ditu, eta, ondorioz, gelaxka huts bakarra duten errenkada guztiak ezabatuko dituzu.

    Beheko irudiak ezkerreko jatorrizko taula erakusten du eta eskuineko emaitza taula. Eta ondoriozko taulan, osatu gabeko errenkada guztiak desagertu dira, baita 10. errenkada ere non D zutabeko data bakarrik falta zen:

    Beheko lerroa: ez baduzu zure datuak nahastu nahi, ez ezabatu hutsik. errenkadak gelaxka hutsak hautatuz. Horren ordez, erabili eztabaidatu den planteamendu garrantzitsuenetako batgauzak behar baino konplexuagoak egin. Beraz, urrats bat gehiago eman dugu eta bi klik bidezko ibilbide bat sortu dugu Excel-en hutsik dauden errenkadak ezabatzeko.

    Ultimate Suite-a zure zintan gehituta, hona hemen nola errenkada huts guztiak ezabatu lan-orri batean:

    1. Ablebits Tools fitxan, Eraldaketa taldean, sakatu Ezabatu hutsuneak > Errenkada hutsak :
    2. Gehigarriak errenkada huts guztiak lan-orri aktibotik kenduko direla jakinaraziko dizu eta berresteko eskatuko dizu. Sakatu Ados, eta une batean, hutsik dauden errenkada guztiak ezabatuko dira.

    Beheko pantaila-argazkian erakusten den bezala, datuekin gelaxka bakar bat ez duten lerro guztiz hutsak baino ez ditugu kendu:

    Aurkitzeko Excel-erako gure Ultimate Suite-n sartutako eginbide ikaragarriagoak ikusteko, probako bertsioa deskargatu dezakezu.

    Eskerrik asko irakurtzeagatik eta datorren astean gure blogean ikustea espero dut!

    behean.

    Nola kendu errenkada hutsak Excel-en VBArekin

    Excel VBA-k gauza asko konpondu ditzake, hainbat errenkada huts barne. Ikuspegi honen gauzarik onena ez duela programazio trebetasunik behar da. Besterik gabe, hartu beheko kodeetako bat eta exekutatu Excel-en (argibideak hemen daude).

    Makroa 1. Ezabatu lerro hutsak hautatutako barruti batean

    VBA kode honek isilean ezabatzen ditu huts guztiak. hautatutako barruti bateko errenkadak, erabiltzaileari inolako mezu edo elkarrizketa-koadrorik erakutsi gabe.

    Aurreko teknikan ez bezala, makroak lerro bat ezabatzen du errenkada osoa hutsik badago . Lan-orriaren CountA funtzioan oinarritzen da lerro bakoitzean hutsik ez dauden gelaxken kopurua lortzeko, eta, ondoren, zero zenbaketa duten errenkadak ezabatzen ditu.

    Public Sub DeleteBlankRows() Dim SourceRange As Range Dim EntireRow As Range As Set SourceRange = Aplikazioa. Hautaketa Ez bada (SourceRange Ez da ezer) Orduan Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step -1 Ezarri 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

    Erabiltzaileak aukera hautatzeko aukera emateko makroa exekutatu ondoren , erabili kode hau:

    Publikoa Sub RemoveBlankLines() Dim SourceRange As Range As Dim EntireRow Range gisa Errorea On Berekin Hurrengoa Ezarri SourceRange = Application.InputBox( _"Hautatu barruti bat:" , "Ezabatu errenkada hutsak" , _ Application.Selection.Address, Mota :=8) Ez bada (SourceRange Ez da ezer) Orduan Application.ScreenUpdating = False For I = SourceRange.Rows.Count To 1 Step - 1 Ezarri 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

    Exekutatzen denean, makroak erakusten du hurrengo sarrera-koadroan, xede-barrutia hautatu eta Ados sakatu:

    Une batean, hautatutako barrutiko lerro huts guztiak ezabatuko dira eta gainerakoak gora aldatuko dira:

    Makroa 2. Ezabatu Excel-eko errenkada huts guztiak

    orri aktiboa ko errenkada huts guztiak kentzeko, zehaztu erabilitako barrutiaren azken errenkada (hau da, errenkada duen errenkada). datuekin azken gelaxka), eta gero gorantz joan CountA zero itzultzen duten lerroak ezabatuz:

    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 1 urratsera -1 If Application.CountA(Rows(RowIndex)) = 0 Then Rows(RowIndex)Delete. Next RowIndex Application.ScreenUpdating = True End Sub

    Makroa 3. Ezabatu errenkada gelaxka hutsik badago

    Makro honekin, errenkada oso bat ezaba dezakezu zehaztutako gelaxka bat bada.zutabea hutsik dago.

    Ondoko kodeak A zutabean hutsuneak dauden egiaztatzen du. Beste zutabe batean oinarritutako errenkadak ezabatzeko, ordezkatu "A" letra egoki batekin.

    Sub DeleteRowIfCellBlank() Errore batean Berrekizu hurrengo zutabeak( "A" ).SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub

    As a Izan ere, makroak Joan Berezira > Hutsuneak funtzioa erabiltzen du, eta emaitza bera lor dezakezu urrats hauek eskuz eginez.

    Oharra. Makroak orri osoko errenkada hutsak ezabatzen ditu, beraz, kontu handiz ibili erabili behar duzunean. Prebentzio gisa, baliteke lan-orriaren babeskopia egitea makro hau exekutatu aurretik.

    Nola kendu lerro hutsak Excel-en VBA-rekin

    Excel-en errenkada hutsak makro bat erabiliz ezabatzeko, VBA kodea zure lan-liburuan txerta dezakezu edo gure adibide-koadernoko makro bat exekutatu.

    Gehitu makro bat zure lan-liburuan

    Zure lan-liburuan makro bat txertatzeko, egin urrats hauek:

    1. Ireki errenkada hutsak ezabatu nahi dituzun lan-orria.
    2. Sakatu Alt + F11 Visual Basic editorea irekitzeko.
    3. Ezkerreko panelean, egin klik eskuineko botoiarekin. ThisWorkbook , eta sakatu Txertatu > Modulua .
    4. Itsatsi kodea Kodearen leihoan.
    5. Sakatu F5. makroa exekutatzeko.

    Pausoz urratseko argibide zehatzak ikusteko, ikusi Nola txertatu eta erabili VBA Excel-en.

    Exekutatu makro bat gure adibideko lan-koadernotik

    Deskargatu gure laginaErrenkada hutsak ezabatzeko makroak dituen lan-liburua eta hortik exekutatu makro hauetako bat:

    EzabatuBlankRows - unean hautatutako barrutian hutsik dauden errenkadak kentzen ditu.

    KenduBlankRows. - errenkada hutsak ezabatzen ditu eta makroa exekutatu ondoren hautatzen duzun barruti batean gora egiten du.

    EzabatuErrankaDenakEmptyRows - orri aktiboko lerro huts guztiak ezabatzen ditu.

    DeleteRowIfCellBlank - errenkada bat ezabatzen du zutabe zehatz bateko gelaxka bat hutsik badago.

    Makroa zure Excel-en exekutatzeko, egin hau:

    1. Ireki deskargatutako lan-liburua eta gaitu makroak eskatzen bazaizu.
    2. Ireki zure lan-liburua eta joan interesgarri den lan-orrira.
    3. Zure lan-orrian, sakatu Alt + F8, hautatu makroa eta sakatu Exekutatu .

    Excel-eko errenkada hutsak ezabatzeko formula

    Ezabatzen ari zarena ikusi nahi baduzu, erabili formula hau lerro hutsak identifikatzeko:

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

    Non A2 lehena den eta D2 lehen datu-errendako erabilitako azken gelaxka den.

    Sartu formula hau a E2n edo 2. errenkadako beste edozein zutabe hutsean, eta arrastatu betetzeko heldulekua formula behera kopiatzeko.

    Ondorioz, "Hutsik" izango duzu errenkada hutsetan eta "Ez hutsik" errenkadetan. datuekin gutxienez gelaxka bat dutenak:

    Formularen logika begi-bistakoa da: ZENBATU funtzioarekin hutsik gabeko gelaxkak zenbatzen dituzu eta IF adierazpena erabiltzen duzu "Hutsik" itzultzeko zero zenbaketa egiteko, "Ez hutsik" bestela. .

    InIzan ere, ondo egin dezakezu IF gabe:

    =COUNTA(A2:D2)=0

    Kasu honetan, formulak TRUE itzuliko du lerro hutsentzat eta FALSE lerro hutsentzat.

    Horrekin formula, egin urrats hauek lerro hutsak ezabatzeko:

    1. Hautatu goiburuko errenkadako edozein gelaxka eta egin klik Ordenatu & Iragazi > Iragazi Hasiera fitxan, Formatuak Honek iragazketa goitibeherako geziak gehituko ditu goiburuko gelaxka guztietan.
    2. Egin klik formula-zutabearen goiburuko gezian, desmarkatu (Hautatu guztiak), hautatu Hutsik eta egin klik OK :
    3. Hautatu iragazitako errenkada guztiak. . Horretarako, egin klik iragazitako lehen errenkadaren lehen gelaxkan eta sakatu Ktrl + Shift + Amaiera hautapena iragazitako azken errenkadako azken gelaxkara zabaltzeko.
    4. Egin klik eskuineko botoiarekin hautatzean, aukeratu . Ezabatu errenkada laster-menutik, eta, ondoren, berretsi errenkada osoak ezabatu nahi dituzula:
    5. Kendu iragazkia Ctrl + Shift + L sakatuz. Edo sakatu Hasiera fitxa > Ordenatu & Iragazi > Iragazi .
    6. Ezabatu formula duen zutabea gehiago behar ez duzulako.

    Hori da! Ondorioz, lerro hutsik gabeko taula garbi bat dugu, baina informazio guztia gordeta:

    Aholkua. Lerro hutsak ezabatu beharrean, hutsik ez diren errenkadak kopiatu ditzakezu beste nonbaitera. Hori egiteko, iragazi "Ez hutsik" errenkadak, hautatu eta sakatu Ctrl + C kopiatzeko. Ondoren, aldatubeste orri bat, hautatu helmuga barrutiaren goiko ezkerreko gelaxka eta sakatu Ctrl + V itsasteko.

    Nola kendu lerro hutsak Excel-en Power Query-rekin

    Excel 2016 eta Excel 2019-n, errenkada hutsak ezabatzeko beste modu bat dago - Power Query funtzioa erabiliz. Excel 2010 eta Excel 2013-n, gehigarri gisa deskargatu daiteke.

    Ohar garrantzitsua! Metodo honek ohar honekin funtzionatzen du: Power Query-k iturburuko datuak Excel taula batean bihurtzen ditu eta formatua aldatzen du, hala nola betetze-kolorea, ertzak eta zenbaki-formatu batzuk. Zure jatorrizko datuen formatua garrantzitsua bada zuretzat, hobe duzu Excel-eko errenkada hutsak kentzeko beste moduren bat aukeratzea.

    1. Hautatu lerro hutsak ezabatu nahi dituzun barrutia.
    2. Joan Datuak fitxara > Lortu & Eraldatu taldea eta sakatu Taula/Barrutitik . Honek zure taula Power Query Editorera kargatuko du.
    3. Power Query Editoreko Hasierako fitxan, sakatu Kendu errenkadak > Kendu hutsik dauden errenkadak .
    4. Sakatu Itxi & Kargatu Honek ondoriozko taula lan-orri berri batera kargatuko du eta Kontsulten editorea itxiko du.

    Manipulazio horien ondorioz, lerro hutsik gabe hurrengo taula lortu nuen, baina aldaketa gaizto batzuekin - moneta formatua galdu egiten da eta datak formatu lehenetsian bistaratzen dira. pertsonalizatuaren ordez:

    Nola ezabatu errenkadak badaZutabe jakin bateko gelaxka hutsik dago

    Tutorial honen hasieran, hutsuneak hautatuta lerro hutsak ezabatzeaz ohartarazi genuen. Hala ere, metodo hau erabilgarria da zutabe zehatz bateko hutsuneetan oinarritutako errenkadak ezabatu nahi badituzu .

    Adibide gisa, kendu ditzagun A zutabeko gelaxka bat hutsik dagoen errenkada guztiak. :

    1. Hautatu gako-zutabea, A zutabea gure kasuan.
    2. Home fitxan, sakatu Bilatu & Hautatu > Joan Berezira . Edo sakatu F5 eta egin klik Berezia... botoian.
    3. Joan Berezira elkarrizketa-koadroan, hautatu Hutsuneak eta egin klik Ados . Honek A zutabeko erabilitako barrutian gelaxka hutsak hautatuko ditu.
    4. Egin klik eskuineko botoiarekin aukeratutako edozein gelaxkan eta aukeratu Ezabatu... testuinguru-menuan.
    5. Ezabatu elkarrizketa-koadroan, aukeratu Errenkada osoa eta sakatu Ados.

    Bukatu! A zutabean baliorik ez duten errenkadak ez daude jada:

    Emaitza bera lor daiteke gako-zutabean hutsuneak iragaziz.

    Nola kendu datuen azpiko lerro gehigarriak

    Batzuetan, guztiz hutsik ikusten duten errenkadek formatu batzuk edo inprimagarriak ez diren karaktereak izan ditzakete. Datuak dituen azken gelaxka zure lan-orrian erabilitako azken gelaxka den egiaztatzeko, sakatu Ctrl + Amaiera. Honek zure datuen azpiko errenkada ikusmen huts batera eraman zaitu, Excel-i dagokionez, errenkada hori ez dago hutsik. Horrelako errenkadak kentzeko, eginhonakoa:

    1. Sakatu zure datuen azpiko lehen errenkada hutsaren goiburuan hautatzeko.
    2. Sakatu Ctrl + Maius + Amaiera . Honek formatuak, zuriuneak eta inprimatzerik gabeko karaktereak barne duten edozer duten lerro guztiak hautatuko ditu.
    3. Egin klik eskuineko botoiarekin hautatzean eta aukeratu Ezabatu... > Errenkada osoa.

    Datu multzo txiki samarra baduzu, baliteke datuen azpiko lerro huts guztiak kendu nahi izatea, adibidez. korritzea errazteko. Excel-en erabiltzen ez diren errenkadak ezabatzeko modurik ez dagoen arren, ez dago ezkutatzea galaraziko dizun ezer. Hona hemen nola:

    1. Hautatu datuekin azken errenkadaren azpiko errenkada bere goiburuan klik eginez.
    2. Sakatu Ctrl + Maius + Behera gezia hautapena orriko azken errenkadara zabaltzeko. .
    3. Sakatu Ctrl + 9 hautatutako errenkadak ezkutatzeko. Edo egin klik eskuineko botoiarekin hautatzean, eta sakatu Ezkutatu .

    errenkadak ezkutatzeko , sakatu Ktrl + A orri osoa hautatzeko, eta, ondoren, sakatu Ktrl + Shift + 9 lerro guztiak berriro ikus daitezen.

    Antzeko moduan, erabili gabeko zutabe hutsak ezkuta ditzakezu zure datuen eskuinaldean. Urrats zehatzetarako, ikusi Ezkutatu erabili gabeko errenkadak Excel-en, lan-eremua soilik ikusgai egon dadin.

    Excel-en hutsik dauden errenkadak kentzeko modurik azkarrena

    Aurreko adibideak irakurtzean, ez al da. intxaur bat apurtzeko mailua erabiltzen ari ginela sentitzen duzu? Hemen, Ablebits-en, nahiago dugu ez egitea

    Michael Brown teknologia-zale dedikatua da, software-tresnak erabiliz prozesu konplexuak sinplifikatzeko grina duena. Hamarkada bat baino gehiagoko esperientzia duen teknologia-industrian, Microsoft Excel eta Outlook-en eta Google Sheets eta Docs-en trebetasunak landu ditu. Michael-en bloga bere ezagutzak eta esperientziak besteekin partekatzera zuzenduta dago, produktibitatea eta eraginkortasuna hobetzeko aholku eta tutorial errazak eskaintzen ditu. Profesional ondua edo hasiberria izan, Michael-en blogak informazio baliotsuak eta aholku praktikoak eskaintzen ditu funtsezko software-tresna horiei etekinik handiena ateratzeko.