Tässä artikkelissa näytetään, miten voit poistaa tyhjiä sarakkeita Excelissä kolmella tehokkaalla ja helpolla tavalla.

Lataa työkirja

Voit ladata harjoituskirjan täältä.

3 yksinkertaista tapaa poistaa tyhjät sarakkeet Excelissä

Tässä opit 3 tapaa poistaa tyhjiä sarakkeita Excelissä käyttämällä Excelin muokkaustyökaluja, käyttämällä kaavaa ja käyttämällä VBA-koodia.

1. Käyttämällä Excelin muokkaustyökaluja

Vaihe 1: Valitse tietokokonaisuus.

Vaihe 2: Siirry osoitteeseen Etusivu -> Etsi & valitse -> Siirry erikoisohjelmaan .

Vaihe 3: Vuodesta Siirry erikoisohjelmaan ponnahdusikkunassa, valitse Aihiot ja napsauta sitten OK .

Vaihe 4: Ainoastaan tietokokonaisuutesi tyhjät solut valitaan. Napsauta hiiren oikealla painikkeella, valitse ponnahdusikkunan vaihtoehtoluettelosta Poista .

Vaihe 5: Seuraavaksi ponnahdusikkunasta Poista laatikko, poimi Siirrä soluja vasemmalle vaihtoehdoista. Napsauta SELVÄ.

Tämä poistaa kaikki tyhjät sarakkeet tietokokonaisuudesta.

Lue lisää: Kuinka poistaa käyttämättömät sarakkeet Excelissä

2. Käyttämällä kaavaa

Voit hyödyntää COUNTA() kaava tyhjien sarakkeiden poistamiseksi Excelissä. Mitä? COUNTA() kaava tunnistaa ensin tyhjät ja ei-tyhjät sarakkeet Excelin tietokokonaisuudessasi, ja sen jälkeen voit helposti valita ja poistaa tyhjät sarakkeet.

Tämä on toinen tehokas tapa poistaa tyhjiä sarakkeita Excelissä, erityisesti silloin, kun sinulla on paljon tyhjiä sarakkeita. Opetellaan, miten se tehdään.

Vaihe 1: Lisää tyhjä rivi suoraan tietokokonaisuuden yläpuolelle napsauttamalla hiiren kakkospainikkeella ensimmäistä rivin otsikkoa ja valitsemalla Lisää Tämä lisää uuden rivin koko tietokokonaisuuden yläpuolelle.

Vaihe 2: Kirjoita seuraava kaava laskentataulukkosi vasemmanpuoleisimpaan soluun,

=COUNTA(A2:A1048576)=0

Tässä,

A2 edustaa tietokokonaisuuden ensimmäistä solua,

A1048576 edustaa rivin enimmäismäärää Excelissä (2007-2019).

Vaihe 3: Paina Kirjoita Se näyttää Totta jos sarake on tyhjä, tai False jos koko sarakkeessa on vähintään yksi ei-tyhjä solu.

Vaihe 4: Sovelletaan kaavaa muihin sarakkeisiin vetämällä saraketta Täyttökahva .

Vaihe 5: Mene nyt osoitteeseen Etusivu -> Lajittele & suodata -> Mukautettu lajittelu .

Vaihe 6: Ponnahdusikkunasta Lajittele ikkunassa, napsauta Vaihtoehdot Valitse sitten Lajittelu vasemmalta oikealle alkaen Lajitteluvaihtoehdot ponnahdusikkunassa ja napsauta OK .

Vaihe 7: Napsauta pudotusvalikkoa Lajittelu ja valitse sieltä vaihtoehto Rivi 1 .

Vaihe 8: Napsauta pudotusvalikkoa kohdassa Lajittele ja valitse vaihtoehto Solun arvot sieltä.

Vaihe 9: Napsauta pudotusvalikkoa kohdassa Tilaa ja valitse vaihtoehto Suurimmasta pienimpään . OK .

Se siirtää kaikki tyhjät sarakkeet työarkin vasemmalle puolelle.

Vaihe 10: Valitse sieltä vain koko tyhjien tyhjien sarakkeiden tietokokonaisuus, napsauta hiiren kakkospainikkeella ja valitse sitten Poista .

Vaihe 11: Ponnahdusikkunasta Poista laatikko, valitse Koko sarake vaihtoehdoista. Napsauta OK .

Tämä poistaa kaikki tyhjät sarakkeet tietokokonaisuudesta.

Samanlaisia lukemia:

• Kuinka poistaa useita sarakkeita Excelissä
• Poista päällekkäiset sarakkeet Excelissä (6 tapaa)
• Kuinka poistaa ylimääräisiä sarakkeita Excelissä (7 menetelmää)
• Poista sarakkeita Excelissä vaikuttamatta kaavaan (kaksi tapaa)

3. Käyttämällä VBA-koodia

Jos olet kokenut Excel-käyttäjä, tämä menetelmä on tarkoitettu erityisesti sinulle. VBA-koodin toteuttaminen on turvallisin tapa poistaa tyhjät sarakkeet Excelissä. Se poistaa vain täysin tyhjät sarakkeet. Jos jokin sarake sisältää yhden solun arvon, vaikka mikä tahansa solu palauttaisi tyhjän merkkijonon, koko sarake säilyy silti täysin ennallaan.

Alla on automaattinen tapa poistaa tyhjät sarakkeet Excelissä.

Vaihe 1: Paina Alt + F11 näppäimistöllä tai siirry välilehdelle Kehittäjä -> Visual Basic avataksesi Visual Basic -editorin.

Vaihe 2: Valitse valikkoriviltä Lisää -> Moduuli .

Vaihe 3: Kopioi seuraava koodi ja liitä se koodiikkunaan.

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

Vaihe 4: Paina F5 näppäimistöllä tai valitse valikkoriviltä Suorita -> Suorita Sub/UserForm Voit myös klikata pientä Toistokuvake alivalikkopalkissa makron suorittamiseksi.

Vaihe 5: Siirry ponnahdusikkunasta haluamallesi työarkille, valitse haluamasi alue ja napsauta painiketta OK .

Tämä poistaa kaikki tyhjät sarakkeet tietokannasta.

Päätelmä

Tässä artikkelissa käsiteltiin kolme helppoa tapaa poistaa tyhjiä sarakkeita Excelissä. Olemme osoittaneet, miten Excelin muokkaustyökaluja käytetään tyhjien sarakkeiden poistamiseen, olemme osoittaneet, miten kaavoja käytetään tyhjien sarakkeiden poistamiseen, ja olemme myös toteuttaneet VBA-koodin tyhjien sarakkeiden poistamiseksi Excelissä.