Satura rādītājs
Šajā pamācībā uzzināsiet, kā noņemt tukšās kolonnas programmā Excel, izmantojot makro, formulu un pogas klikšķi.
Lai cik triviāli tas arī neizklausītos, tukšo kolonnu dzēšana programmā Excel nav kaut kas tāds, ko var paveikt ar vienu peles klikšķi. To nevar izdarīt arī ar diviem klikšķiem. Perspektīvā pārskatīt visas darblapas kolonnas un manuāli dzēst tukšās kolonnas noteikti ir kaut kas tāds, no kā vēlaties izvairīties. Par laimi, Microsoft Excel piedāvā ļoti daudz dažādu funkciju, un, izmantojot tās.funkcijas radošos veidos var tikt galā ar gandrīz jebkuru uzdevumu!
Ātrs veids, kā dzēst tukšas kolonnas, kuras nekad nevajadzētu izmantot
Kad runa ir par tukšo vietu noņemšanu programmā Excel (neatkarīgi no tā, vai tās ir tukšas šūnas, rindas vai kolonnas), daudzos tiešsaistes resursos tiek izmantota programma Pārejiet uz Īpašais > Tukšas preces komanda. Nekad to nedariet savās darblapās!
Šī metode ( F5 > Īpaša... > Tukšas preces ) atrod un atlasa visas tukšās šūnas diapazonā:
Ja tagad ar peles labo pogu noklikšķiniet uz atlasītajām šūnām un izvēlieties Dzēst > Visa sleja , visas kolonnas, kurās ir vismaz viena tukša šūna tiks pazaudēts! Ja esat to netīšām izdarījis, nospiediet Ctrl + Z, lai visu atgūtu atpakaļ.
Tagad, kad zināt nepareizo veidu, kā dzēst tukšās kolonnas programmā Excel, aplūkosim, kā to izdarīt pareizi.
Kā noņemt tukšās kolonnas programmā Excel, izmantojot VBA
Pieredzējuši Excel lietotāji zina šo principu: lai netērētu stundas, kaut ko darot manuāli, ieguldiet dažas minūtes, lai uzrakstītu makro, kas to darīs automātiski.
Tālāk redzamajā VBA makroattēlā tiek dzēstas visas tukšās kolonnas atlasītajā diapazonā. Un tas tiek darīts droši - tiek dzēstas tikai pilnīgi tukšas kolonnas. Ja kolonnā ir vienas šūnas vērtība, pat tukša virkne, ko atgriež kāda formula, šāda kolonna paliek neskarta.
Excel makro: noņemiet tukšos kolonnas no Excel lapas Public Sub DeleteEmptyColumns() Dim SourceRange As Range Dim EntireColumn As Range On Error Resume Next Set SourceRange = Application.InputBox( _ "Select a range:" , "Delete Empty Columns" , _ Application.Selection.Address, Type :=8) If Not (SourceRange Is Nothing ) Then Application.ScreenUpdating = False For i = SourceRange.Columns.Count To 1Solis -1 Set EntireColumn = SourceRange.Cells(1, i).EntireColumn If Application.WorksheetFunction.CountA(EntireColumn) = 0 Then EntireColumn.Delete End If Next Application.ScreenUpdating = True End If End If End SubKā lietot makroattēlu Tukšas kolonnas dzēšana
Tālāk ir aprakstīti soļi, kā pievienot makro jūsu programmā Excel:
- Nospiediet Alt + F11, lai atvērtu Visual Basic redaktoru.
- Izvēlnes joslā noklikšķiniet uz Ievietot > Modulis .
- Ievietojiet iepriekš minēto kodu logā Kods.
- Nospiediet F5, lai palaistu makro.
- Kad parādās uznirstošais dialoglodziņš, pārslēdzieties uz interesējošo darblapu, atlasiet vēlamo diapazonu un noklikšķiniet uz Labi:
Ja nevēlaties pievienot makroattēlu darblapai, varat to palaist no mūsu parauga darbgrāmatas. Lūk, kā to darīt:
- Lejupielādējiet mūsu parauga darbgrāmatu, lai noņemtu tukšās kolonnas programmā Excel, atveriet to un iespējojiet saturu, ja tas tiek pieprasīts.
- Atveriet savu darbgrāmatu vai pārslēdzieties uz jau atvērtu darbgrāmatu.
- Darba burtnīcā nospiediet Alt + F8 , atlasiet DeleteEmptyColumns un noklikšķiniet uz Palaist .
- Iznirstošajā dialoglodziņā atlasiet diapazonu un noklikšķiniet uz LABI .
Jebkurā gadījumā visas tukšās kolonnas atlasītajā diapazonā tiks likvidētas:
Tukšu kolonnu identificēšana un dzēšana programmā Excel, izmantojot formulu
Iepriekš minētais makroattēls ātri un klusi noņem tukšās kolonnas. Bet, ja esat "visu kontrolēt" tipa cilvēks (kā es :), iespējams, vēlēsieties vizuāli redzēt kolonnas, kuras tiks noņemtas. Šajā piemērā mēs vispirms identificēsim tukšās kolonnas, izmantojot formulu, lai jūs varētu ātri tās pārskatīt un pēc tam likvidēt visas vai dažas no šīm kolonnām.
Piezīme. Pirms kaut ko dzēst neatgriezeniski, jo īpaši izmantojot nezināmu tehniku, es noteikti iesaku jums veikt rezerves kopija darbgrāmatā, lai būtu drošībā, ja kaut kas notiktu nepareizi.
Izmantojot drošā vietā esošo dublējumkopiju, veiciet šādas darbības:
Solis 1. Ievietojiet jaunu rindu
Pievienojiet jaunu rindu tabulas augšpusē. Lai to izdarītu, ar peles labo pogu noklikšķiniet uz pirmās rindas galvenes un noklikšķiniet uz Ievietot Neuztraucieties par datu struktūras/izkārtojuma izmainīšanu - šo rindu varat dzēst vēlāk.
Solis 2. Identificējiet tukšās kolonnas
Jaunpievienotās rindas kreisajā galējā šūnā ievadiet šādu formulu:
=COUNTA(A2:A1048576)=0
Pēc tam, velkot aizpildīšanas rokturi, nokopējiet formulu uz citām kolonnām.
Formulas loģika ir ļoti vienkārša: COUNTA pārbauda tukšo šūnu skaitu kolonnā no 2. rindas līdz 1048576 rindai, kas ir rindas maksimums programmā Excel 2019 - 2007. Jūs salīdzināt šo skaitu ar nulli un kā rezultātu tukšajās kolonnās ir TRUE un kolonnās, kurās ir vismaz viena nepilna šūna, ir FALSE. Pateicoties relatīvo šūnu atsauču izmantošanai, formula pareizi pielāgo katru kolonnu.kur tas tiek kopēts.
Ja darblapu izveidojat kādam citam, iespējams, vēlēsieties apzīmēt kolonnas jēgpilnākā veidā. Nav problēmu, to var viegli izdarīt, izmantojot līdzīgu IF paziņojumu:
=IF(COUNTA(A2:A1048576)=0, "Tukšs", "Nav tukšs")
Tagad formulā ir skaidri norādīts, kuras kolonnas ir tukšas un kuras nav:
Padoms. Salīdzinot ar makro, šī metode nodrošina lielāku elastību attiecībā uz to, kuras kolonnas jāuzskata par tukšām. Šajā piemērā mēs pārbaudām visu tabulu, ieskaitot galvenes rindu. Tas nozīmē, ka, ja kolonnā ir tikai galvene, šāda kolonna netiek uzskatīta par tukšu un netiek dzēsta. Ja vēlaties pārbaudīt tikai datu rindas. kolonnu virsrakstu ignorēšana , no mērķa diapazona (A3:A1048576) noņemiet virsraksta rindu(-as). Rezultātā sleja, kurai ir virsraksts un kurā nav citu datu, tiks uzskatīta par tukšu un tiks dzēsta. Varat arī ierobežot diapazonu līdz pēdējai izmantotajai rindai, kas mūsu gadījumā būtu A11.
3. solis. Tukšo kolonnu noņemšana
Ja ir pietiekams kolonnu skaits, varat vienkārši atlasīt tās, kuru pirmajā rindā ir "tukšs" (lai atlasītu vairākas kolonnas, turiet taustiņu Ctrl, klikšķinot kolonnu burtus). Pēc tam ar peles labo pogu noklikšķiniet uz jebkuras atlasītās kolonnas un izvēlieties. Dzēst no konteksta izvēlnes:
Ja darblapā ir desmitiem vai simtiem kolonnu, ir lietderīgi visas tukšās kolonnas padarīt redzamas. Šim nolūkam veiciet šādu darbību:
- Izvēlieties augšējo rindu ar formulām, dodieties uz Dati cilne> Kārtot un filtrēt grupu un noklikšķiniet uz Atlasīt pogu.
- Dialoglodziņā, kas tiek parādīts, atlasiet Izvērst atlasi un noklikšķiniet uz Kārtot...
- Tas atvērs Atlasīt dialoglodziņā, kurā noklikšķiniet uz Iespējas... pogu, izvēlieties Kārtot no kreisās uz labo, un noklikšķiniet uz LABI .
- Konfigurējiet tikai vienu šķirošanas līmeni, kā parādīts tālāk, un noklikšķiniet uz Labi:
- Kārtot pēc: 1. rinda
- Kārtot pēc: šūnu vērtības
- Pasūtījums: no A līdz Z
Rezultātā tukšās kolonnas tiks pārvietotas uz darblapas kreiso daļu:
- Atlasiet visas tukšās kolonnas - noklikšķiniet uz pirmās kolonnas burta, nospiediet Shift un pēc tam noklikšķiniet uz pēdējās tukšās kolonnas burta.
- Ar peles labo pogu noklikšķiniet uz atlasītajām kolonnām un izvēlieties Dzēst no uznirstošās izvēlnes.
Paveikts! Jūs esat atbrīvojies no tukšajām kolonnām, un tagad nekas netraucē jums dzēst augšējo rindu ar formulām.
Ātrākais veids, kā noņemt tukšās kolonnas programmā Excel
Šīs pamācības sākumā es rakstīju, ka nav iespējams ar vienu klikšķi izdzēst tukšās kolonnas programmā Excel. Patiesībā tas nav gluži tā. Man vajadzēja teikt, ka nav iebūvēta veida. Mūsu Ultimate Suite lietotāji var izdzēst tukšās kolonnas programmā Excel burtiski ar pāris klikšķiem :)
Mērķa darblapā pārslēdzieties uz Ablebits rīki noklikšķiniet uz cilnes Dzēst tukšos laukumus un izvēlieties Tukšas kolonnas :
Lai pārliecinātos, ka tas nav nejaušs peles klikšķis, papildprogramma lūgs jums apstiprināt, ka patiešām vēlaties no darblapas noņemt tukšās kolonnas:
Noklikšķiniet uz LABI , un pēc mirkļa visas tukšās kolonnas ir pazudušas!
Tāpat kā iepriekš aplūkotais makro, šis rīks dzēš tikai tās kolonnas, kas ir pilnīgi tukšs Tiek saglabātas kolonnas, kurām ir jebkura viena vērtība, tostarp galvenes.
Dzēst tukšos laukumus tā ir tikai viena no desmitiem brīnišķīgo funkciju, kas var atvieglot jūsu kā Excel lietotāja dzīvi. Lai uzzinātu vairāk, varat lejupielādēt mūsu programmas Ultimate Suite for Excel izmēģinājuma versiju.
Tukšas kolonnas netiek dzēstas! Kāpēc?
Izdevums : Jūs esat izmēģinājis visas iepriekš minētās metodes, bet jūsu darblapā ir iestrēgušas viena vai vairākas tukšas kolonnas. Kāpēc?
Visticamāk, tāpēc, ka šīs kolonnas patiesībā nav tukšas. Excel izklājlapās var slēpties daudz dažādu cilvēka acīm neredzamu rakstzīmju, kas netiek pamanītas, jo īpaši, ja esat importējis informāciju no ārēja avota. Tā var būt tikai tukša virkne vai atstarpes rakstzīme, atstarpes bez pārrāvuma vai kāda cita rakstzīme, kas nav drukas rakstzīme.
Lai noteiktu vainīgo, atlasiet pirmo problemātiskās kolonnas šūnu un nospiediet taustiņu Ctrl + bultiņa uz leju . Piemēram, zemāk redzamajā ekrānšāviņas attēlā C sleja nav tukša, jo C6 ir viena atstarpes zīme:
Divreiz noklikšķiniet uz šūnas, lai redzētu, kas tajā patiesībā atrodas, vai vienkārši nospiediet taustiņu Delete, lai atbrīvotos no nezināmā. Un pēc tam atkārtojiet iepriekš minēto procesu, lai noskaidrotu, vai šajā slejā ir vēl kādas citas neredzamas lietas. Varētu arī attīrīt datus, likvidējot priekšējās, aizmugurējās un nesadalītās atstarpes.
Paldies, ka izlasījāt, un ceru, ka nākamnedēļ tiksimies mūsu blogā!
