Kazalo
V tem članku boste izvedeli, kako lahko prazne stolpce v Excelu izbrišete na tri učinkovite in preproste načine.
Prenos delovnega zvezka
Delovni zvezek za vadbo lahko prenesete tukaj.
Delete-Blank-Columns-in-Excel.xlsm3 preprosti načini za brisanje praznih stolpcev v Excelu
Tukaj boste spoznali 3 načine za brisanje praznih stolpcev v Excelu, in sicer z uporabo orodij za urejanje v Excelu, s formulo in z uporabo kode VBA.
1. Z uporabo orodij za urejanje programa Excel
Korak 1: Izberite nabor podatkov.
Korak 2: Pojdi na Domov -> Poišči & amp; Izberite -> Pojdi na poseben .
Korak 3: Od Pojdi na poseben v pojavnem oknu izberite Prazni deli , nato kliknite V REDU .
4. korak: Izbrane bodo samo prazne celice iz vašega nabora podatkov. Kliknite z desno tipko miške in s pojavnega seznama možnosti izberite Izbriši .
5. korak: Nato v pojavnem oknu Izbriši polje, izberite Premaknite celice v levo med možnostmi. Kliknite V REDU.
S tem boste iz nabora podatkov izbrisali vse prazne stolpce.
Preberite več: Kako izbrisati neuporabljene stolpce v programu Excel
2. Z uporabo formule
Uporabite lahko COUNTA() formulo za brisanje praznih stolpcev v Excelu. COUNTA() formula bo najprej prepoznala prazne in neprazne stolpce v naboru podatkov v Excelu, nato pa lahko preprosto izberete in izbrišete prazne stolpce.
To je še en učinkovit način za brisanje praznih stolpcev v Excelu, zlasti kadar imate veliko praznih stolpcev za delo. Naučimo se, kako to storiti.
Korak 1: Vstavite prazno vrstico tik nad niz podatkov tako, da z desno tipko miške kliknete glavo prve vrstice in izberete Vstavite s pojavnega seznama možnosti. To bo vstavilo novo vrstico nad celotnim naborom podatkov.
Korak 2: V skrajno levo celico delovnega lista zapišite naslednjo formulo,
=COUNTA(A2:A1048576)=0
Tukaj,
A2 predstavlja prvo celico nabora podatkov,
A1048576 predstavlja največjo vrstico v Excelu (2007-2019).
Korak 3: Pritisnite Vnesite . Prikazalo se bo Resnično če je stolpec prazen, ali Lažno če je v celotnem stolpcu vsaj ena celica, ki ni prazna.
4. korak: Uporabite formulo za druge stolpce tako, da povlečete Ročaj za polnjenje .
5. korak: Zdaj pojdite v Domov -> Razvrsti in filtriraj -> Razvrstitev po meri .
Korak 6: Iz pojavnega okna Razvrsti kliknite na okno Možnosti Nato izberite Razvrsti od leve proti desni iz Možnosti razvrščanja pojavno okno in kliknite V REDU .
Korak 7: Kliknite spustno polje poleg Razvrsti po nalepko in tam izberite možnost Vrstica 1 .
Korak 8: Kliknite spustno polje pod Razvrsti na in izberite možnost Vrednosti celic od tam.
9. korak: Kliknite spustno polje pod Naročilo in izberite možnost Od največjega do najmanjšega . klikni V REDU .
Vse prazne stolpce bo premaknil na levo stran delovnega lista.
Korak 10: Od tam izberite celoten nabor podatkov s praznimi praznimi stolpci, kliknite z desno tipko miške in nato izberite Izbriši .
Korak 11: Iz pojavnega okna Izbriši izberite polje Celoten stolpec med možnostmi. Kliknite V REDU .
S tem boste iz nabora podatkov izbrisali vse prazne stolpce.
Podobna branja:
- Kako izbrisati več stolpcev v programu Excel
- Brisanje podvojenih stolpcev v Excelu (6 načinov)
- Kako izbrisati dodatne stolpce v Excelu (7 metod)
- Brisanje stolpcev v Excelu brez vpliva na formulo (dva načina)
3. Z uporabo kode VBA
Če ste izkušen uporabnik programa Excel, je ta metoda posebej za vas. Izvajanje kode VBA je najvarnejši način za brisanje praznih stolpcev v programu Excel. Izbriše samo popolnoma prazne stolpce. Če kateri koli stolpec vsebuje eno samo vrednost celice, tudi če katera koli celica vrne prazen niz, bo celoten stolpec še vedno popolnoma nedotaknjen.
Spodaj je opisan samodejni način brisanja praznih stolpcev v programu Excel.
Korak 1: Pritisnite Alt + F11 na tipkovnici ali odprite zavihek Razvijalec -> Visual Basic za odprtje urejevalnika Visual Basic.
Korak 2: V menijski vrstici kliknite Vstavite -> Modul .
Korak 3: Kopirajte naslednjo kodo in jo prilepite v okno s kodo.
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
4. korak: Pritisnite F5 na tipkovnici ali v menijski vrstici izberite Spustite -> Zaženi pod/UserForm Lahko tudi kliknete na majhno ikono Ikona za predvajanje v podmeniju za zagon makra.
5. korak: V pojavnem pogovornem oknu preklopite na delovni list, ki vas zanima, izberite želeno območje in kliknite V REDU .
S tem boste iz podatkovne zbirke izbrisali vse prazne stolpce.
Zaključek
V tem članku smo obravnavali tri preproste načine za brisanje praznih stolpcev v Excelu. Pokazali smo, kako uporabiti orodja za urejanje v Excelu za brisanje praznih stolpcev, kako uporabiti formule za brisanje praznih stolpcev in kako uporabiti kodo VBA za brisanje praznih stolpcev v Excelu.