Note: The other languages of the website are Google-translated. Back to English

Hvordan slettes flere tomme kolonner hurtigt i Excel?

Nogle gange, når du importerer data til Microsoft Excel fra en kilde, såsom webside, CSV, tekst osv., Kan der være mange tomme kolonner med det. Det skal være tidskrævende at slette hver tomme kolonne en efter en. Derfor søger nogle af os efter nemme måder at løse dette problem på. Denne artikel samler nogle vanskelige tip, der hjælper dig med hurtigt at slette flere tomme kolonner.

Slet flere tomme kolonner i regnearket med formlen

Slet flere tomme kolonner i regneark med VBA-kode

Slet flere tomme kolonner i markering / aktivt ark / hele projektmappe med en nyttig funktion

Slet flere tomme kolonner med en overskrift ved hjælp af VBA-kode


Slet flere tomme kolonner i regnearket med formlen

I Excel kan du anvende en formel til at identificere, hvis kolonnerne er tomme eller ikke, og derefter bruge Sort funktion til at sortere alle tomme kolonner sammen og derefter slette dem på én gang. Gør som dette:

1. Tilføj en ny række øverst i dit dataområde, se skærmbillede:

2. Indtast derefter nedenstående formel i celle A1, og træk derefter fyldhåndtaget til højre for at anvende denne formel på andre celler, en SAND vises, hvis kolonnen er tom, ellers vises en FALSE, se skærmbillede:

=COUNTA(A2:A1048576)=0

3. Vælg derefter dataområdet inklusive hjælperrækken, og klik derefter på data > Sort, se skærmbillede:

4. I poppet ud Sort dialogboksen, klik Indstillinger i det følgende Sortér Indstillinger dialog, vælg Sorter fra venstre mod højre mulighed, se skærmbilleder:

5. Klik OK knappen for at returnere Sort dialog, og vælg derefter Række 1 fra Sorter efter drop down, og vælg Celleværdier fra Sorter til sektion, skal du vælge Største til mindste fra Bestilt sektion, se skærmbillede:

6. Derefter er alle tomme kolonner sorteret til venstre for dine data, og nu skal du bare vælge alle kolonner og derefter højreklikke, vælge Slette for at slette disse tomme kolonner på én gang, se skærmbillede:


Slet flere tomme kolonner i regneark med VBA-kode

Hvis du gerne vil bruge VBA-makro, går tingene meget lettere. Følgende VBA-kode kan hjælpe dig, gør venligst som denne:

1. Hold nede andre + F11 nøgler i Excel, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende makro i Moduler Vindue.

VBA-kode: Slet flere tomme kolonner i markeringen:

Sub DeleteEmptyColumns () 'Opdateret af Extendoffice
Dim rng As Range Dim InputRng As Range xTitleId = "KutoolsforExcel" Set InputRng = Application.Selection Set InputRng = Application.InputBox ("Range:", xTitleId, InputRng.Address, Type: = 8) Application.ScreenUpdating = False For i = InputRng.Columns.Count To 1 Step -1 Set rng = InputRng.Cells (1, i) .EntireColumn If Application.WorksheetFunction.CountA (rng) = 0 Derefter rng.Slet Slet hvis næste Application.ScreenUpdating = True End Sub

3. Tryk på F5 nøgle for at køre denne makro, skal du vælge det arbejdsområde, du har brug for i pop-out-dialogboksen. Se skærmbillede:

4. Klik OK, så fjernes alle tomme kolonner i markeringen. Se skærmbillede:


Slet flere tomme kolonner i markering / aktivt ark / hele projektmappe med en nyttig funktion

Slet skjulte (synlige) rækker og kolonner nytte af Kutools til Excel kan hjælpe dig med hurtigt at fjerne flere tomme rækker eller kolonner på én gang.

Tips:At anvende dette Slet skjulte (synlige) rækker og kolonner funktion, for det første skal du downloade Kutools til Excel, og anvend derefter funktionen hurtigt og nemt.

Efter installation Kutools til Excelskal du gøre som dette:

1. Klik Kutools > Slette > Slet skjulte (synlige) rækker og kolonner, se skærmbillede:

2. I Slet skjulte (synlige) rækker og kolonner dialogboks, skal du angive det omfang, som du vil anvende operationen fra Kig ind rulleliste. (Hvis du vælger I valgt interval, skal du vælge et interval, som du først vil bruge.) Og derefter kontrollere Kolonner under Slet type. Og vælg Tomme søjler fra Detaljeret type. Se skærmbillede:

3. Klik derefter på OK. Og de tomme kolonner er slettet fra det valgte interval. Se skærmbillede:


Slet flere tomme kolonner med en overskrift ved hjælp af VBA-kode

Nogle gange vil du måske slette alle de tomme kolonner, der kun indeholder en overskrift i regnearket. Følgende VBA-kode kan gøre dig en tjeneste, gør venligst med følgende trin:

1. Hold nede andre + F11 nøgler i Excel, og det åbner Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende makro i Moduler Vindue.

VBA-kode: Slet alle tomme kolonner med en overskrift

Sub deleteblankcolwithheader()
'updateby Extendoffice
    Dim xEndCol As Long
    Dim I As Long
    Dim xDel As Boolean
    On Error Resume Next
    xEndCol = Cells.Find("*", SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column
    If xEndCol = 0 Then
        MsgBox "There is no data on """ & ActiveSheet.Name & """ .", vbExclamation, "Kutools for Excel"
        Exit Sub
    End If
    Application.ScreenUpdating = False
    For I = xEndCol To 1 Step -1
        If Application.WorksheetFunction.CountA(Columns(I)) <= 1 Then
            Columns(I).Delete
            xDel = True
        End If
    Next
    If xDel Then
        MsgBox "All blank column(s) with only a header row have been deleted.", vbInformation, "Kutools for Excel"
    Else
        MsgBox "There are no Columns to delete as each one has more data (rows) than just a header.", vbExclamation, "Kutools for Excel"
    End If
    Application.ScreenUpdating = True
End Sub

3. Tryk derefter på F5-tasten for at køre denne kode, og der vises et promptfelt for at minde dig om, at de tomme kolonner med overskrift slettes, se skærmbillede:

4. Klik derefter på OK-knappen, alle de tomme kolonner med kun overskrift i det aktuelle regneark slettes på én gang. Se skærmbilleder:


Flere relative artikler:

  • Slet alle billeder eller andre objekter i Excel
  • Hvis du vil slette alle billeder fra Microsoft Excel, kan det være tidskrævende at vælge hvert billede og slette dem et efter et. Følgende tricks kan lette dit arbejde med at slette alle billeder.
  • Slet rækker baseret på baggrundsfarve i Excel
  • Hvordan kunne du slette hele rækker baseret på baggrundsfarve? I dette eksempel skal jeg slette alle rækker, hvilke celler der er fyldt med blå baggrundsfarve som vist på det viste skærmbillede. Med denne artikel får du nogle koder til at nå denne opgave i Excel.


De bedste Office-produktivitetsværktøjer

Kutools til Excel løser de fleste af dine problemer og øger din produktivitet med 80%

  • Genbruge: Indsæt hurtigt komplekse formler, diagrammer og alt, hvad du har brugt før; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner uden at miste data; Split celler indhold; Kombiner duplikerede rækker / kolonner... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Mere end 300 kraftfulde funktioner. Understøtter Office / Excel 2007-2021 og 365. Understøtter alle sprog. Nem implementering i din virksomhed eller organisation. Fuld funktioner 30-dages gratis prøveperiode. 60 dages pengene tilbage garanti.
kte-fane 201905

Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
officetab bund

Sorter kommentarer efter
Kommentarer (8)
Ingen vurderinger endnu. Vær den første til at bedømme!
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg fandt det meget nemmere at gå til linjen efter min sidste datalinje, indtaste "Shift-Ctrl-End" for at fremhæve alle tomme linjer, der fulgte (meget hurtigere), højreklikke og indtaste "slet alle rækker/kolonner". Systemet spildte ikke så meget tid på at søge på denne måde, så det var rent på et øjeblik, og filer på 20 MB blev droppet til en størrelse på 20 kb.
Denne kommentar blev minimeret af moderatoren på webstedet
ovenstående detaljer er meget nyttige til mit personlige brug. Tak for din vejledning. M.KARTHIKEYAN :-)
Denne kommentar blev minimeret af moderatoren på webstedet
Meget nyttig side. Tak skal du have. :-) Min udfordring er, at jeg har kolonner med overskrifter, men ingen data i den kolonne. Kun overskriften er til stede. Hvordan ville man gå om at slette kolonner, hvor der ikke er data, men overskriften er der? :o
Denne kommentar blev minimeret af moderatoren på webstedet
Hej, det du nævner er så hjælpsomt. Jeg vil have en lille hjælp fra din side. Dagligt downloader nogle filer og ved hjælp af pivot udarbejdede rapporterne. Det er daglig opgave for mig og rutineproces. Hvordan kan jeg gøre det uden at bruge pivot. Eks: Hvis jeg udarbejdede rapporterne i går i "A" Excel-fil. Næste dag i "A" Excel-fil erstatter jeg bare de nye "B" Excel-fildata. Ved denne automatisk rapport ville blive oprettet? Er det muligt?
Denne kommentar blev minimeret af moderatoren på webstedet
Hej, kan nogen guide, hvordan jeg kan slette tomme celler i en række eller kolonne ... bemærk hele tomme kolonne eller rækker ... kun tomme celler jeg skal slette i en kolonne
Denne kommentar blev minimeret af moderatoren på webstedet
Hej,


prøv at implementere nedenstående kode
Denne kommentar blev minimeret af moderatoren på webstedet
Tak for dens meget hjælpsomme side med grundlæggende excel-mulighed :)
Denne kommentar blev minimeret af moderatoren på webstedet
Det slettede alle mine navne i min fornavnskolonne! Auggh!
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder

Følg os

Copyright © 2009 - www.extendoffice.com. | Alle rettigheder forbeholdes. Drevet af ExtendOffice. | | Sitemap
Microsoft og Office-logoet er varemærker eller registrerede varemærker tilhørende Microsoft Corporation i USA og / eller andre lande.
Beskyttet af Sectigo SSL