Ta bort tomma kolumner i Excel (3 sätt)

  • Dela Detta
Hugh West

Den här artikeln visar hur du kan ta bort tomma kolumner i Excel på tre effektiva och enkla sätt.

Ladda ner arbetsboken

Du kan ladda ner arbetsboken här.

Ta bort tomma kolumner i Excel.xlsm

3 enkla sätt att ta bort tomma kolumner i Excel

Här får du lära dig tre sätt att ta bort tomma kolumner i Excel genom att använda Excel-redigeringsverktyg, använda en formel och implementera VBA-kod.

1. Genom att använda Excel-redigeringsverktyg

Steg 1: Välj datasetet.

Steg 2: Gå till Hem -> Hitta & Välj -> Gå till Special .

Steg 3: Från Gå till Special popup-fönstret, välj Blanks och klicka sedan på OK .

Steg 4: Endast de tomma cellerna i datasetet kommer att väljas. Högerklicka med musen, välj i alternativlistan i popup-fönstret Ta bort .

Steg 5: Därefter, från popup-fönstret Ta bort låda, plocka Flytta cellerna till vänster från alternativen. Klicka på OKEJ.

Detta tar bort alla tomma kolumner från datasetet.

Läs mer: Ta bort oanvända kolumner i Excel

2. Genom att använda en formel

Du kan använda dig av COUNTA() formel för att ta bort tomma kolumner i Excel. COUNTA() Formeln identifierar först de tomma och icke-tomma kolumnerna i ditt dataset i Excel och sedan kan du enkelt välja och ta bort de tomma kolumnerna.

Detta är ett annat effektivt sätt att ta bort tomma kolumner i Excel, särskilt när du har många tomma kolumner att arbeta med. Låt oss lära oss hur man gör det.

Steg 1: Infoga en tom rad precis ovanför datasetet genom att högerklicka på den första radens rubrik och välja Infoga från listan med popup-alternativ. Detta kommer att infoga en ny rad ovanför hela datasetet.

Steg 2: Skriv följande formel i den vänstra cellen i arbetsbladet,

=COUNTA(A2:A1048576)=0

Här,

A2 representerar den första cellen i datasetet,

A1048576 representerar den högsta raden i Excel (2007-2019).

Steg 3: Tryck på Gå in på Den visar True om kolumnen är tom, eller Falskt om det finns minst en enda icke-tom cell i hela kolumnen.

Steg 4: Applicera formeln på de andra kolumnerna genom att dra i Handtag för fyllning .

Steg 5: Gå nu till Hem -> Sortera & Filtrera -> Anpassad sortering .

Steg 6: Från popup-fönstret Sortera fönstret, klickar du på Alternativ och väljer sedan Sortera från vänster till höger från Sorteringsalternativ popup-fönstret och klicka på OK .

Steg 7: Klicka på rullgardinsrutan bredvid Sortera efter och väljer där alternativet Rad 1 .

Steg 8: Klicka på rullgardinsrutan under Sortera på och välj alternativet Cellvärden därifrån.

Steg 9: Klicka på rullgardinsrutan under Beställ och välj alternativet Störst till minsta . Klicka OK .

Det kommer att flytta alla tomma kolumner till vänster i arbetsbladet.

Steg 10: Där väljer du bara hela datasetet med tomma tomma kolumner, högerklickar och väljer sedan Ta bort .

Steg 11: Från popup-fönstret Ta bort rutan, väljer du den Hela kolumnen från alternativen. Klicka på OK .

Detta tar bort alla tomma kolumner från datasetet.

Liknande läsningar:

  • Ta bort flera kolumner i Excel
  • Ta bort dubbla kolumner i Excel (6 sätt)
  • Ta bort extra kolumner i Excel (7 metoder)
  • Ta bort kolumner i Excel utan att påverka formeln (två sätt)

3. Genom att använda VBA-kod

Om du är en erfaren Excel-användare är den här metoden speciellt för dig. Att implementera VBA-kod är det säkraste sättet att ta bort tomma kolumner i Excel. Det raderar endast de helt tomma kolumnerna. Om någon kolumn innehåller ett enda cellvärde, även om någon cell returnerar en tom sträng, kommer hela kolumnen att vara helt intakt.

Nedan följer ett automatiserat sätt att ta bort tomma kolumner i Excel.

Steg 1: Tryck på Alt + F11 på tangentbordet eller gå till fliken Utvecklare -> Visual Basic för att öppna Visual Basic Editor.

Steg 2: I menyraden klickar du på Infoga -> Modul .

Steg 3: Kopiera följande kod och klistra in den i kodfönstret.

 Public Sub DeleteBlankColumns() Dim SrcRange As Range Dim EntrColumn As Range On Error Resume Next Set SrcRange = Application.InputBox( _ "Välj ett område:", "Ta bort tomma kolumner", _ 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 

Steg 4: Tryck på F5 på tangentbordet eller välj i menyraden Kör -> Kör Sub/UserForm Du kan också klicka på den lilla Spela upp ikonen i undermenyfältet för att köra makrot.

Steg 5: I popup-dialogrutan växlar du till det aktuella arbetsbladet, väljer det önskade intervallet och klickar på OK .

Detta raderar alla tomma kolumner från databasen.

Slutsats

I den här artikeln diskuteras tre enkla sätt att ta bort tomma kolumner i Excel. Vi har visat hur du använder Excel-redigeringsverktyg för att ta bort tomma kolumner, vi har visat hur du använder formler för att ta bort tomma kolumner och vi har också implementerat VBA-koden för att ta bort tomma kolumner i Excel.

Hugh West är en mycket erfaren Excel-tränare och analytiker med över 10 års erfarenhet i branschen. Han har en kandidatexamen i redovisning och ekonomi och en magisterexamen i företagsekonomi. Hugh har en passion för undervisning och har utvecklat ett unikt undervisningssätt som är lätt att följa och förstå. Hans expertkunskap om Excel har hjälpt tusentals studenter och yrkesverksamma över hela världen att förbättra sina färdigheter och utmärka sig i sina karriärer. Genom sin blogg delar Hugh med sig av sin kunskap med världen, och erbjuder gratis Excel-handledning och onlineutbildning för att hjälpa individer och företag att nå sin fulla potential.