Sådan slettes alle tomme kolonner i Microsoft Excel

Der er flere måder at slette tomme kolonner i en Microsoft Excel-fil. Hvorfor skulle du gøre dette? - Enkelt.

Se også vores artikel Sådan fryses topraden i Excel

Af og til kan de data, du importerer fra websider, resultere i, at der vises et stort antal kolonner, selvom de ikke bruges. Du ser dette ske med CSV-filer og .txt-filer lige så ofte.

Når det sker, er det ikke altid nemt at slette kolonner manuelt. Selvfølgelig, hvis du kun har to eller tre tomme kolonner, er det helt ok at slette dem manuelt. Men hvad nu hvis dit importerede projekt opretter 57 tomme og ikke-kontinuerlige kolonner? - Til det har du brug for en automatiseret proces.

Brug af VBA-makro

hurtige links

• Brug af VBA-makro
  • • • Gå til din Excel-fil
      • Hold Alt og F11 sammen
      • Vent til vinduet Microsoft Visual Basic for Applications vises
      • Klik på Indsæt
      • Vælg modul
      • Indsæt de følgende kodelinjer i vinduet
      • Tryk på F5 for at kompilere og udføre makroen
      • Indtast det relevante arbejdsområde i dialogvinduet
      • $ A $ 1 - Øverste hjørne
      • $ J $ 12 - Nederste hjørne
      • Tryk på OK
• Brug af Excel-værktøjer
  • • • Vælg først dataområdet
      • Tryk på F5
      • Klik på Special
      • Vælg Blanks indstilling
      • Klik på OK (dette valg sikrer, at alle tomme celler er valgt i det målrettede interval)
      • Gå til fanen Hjem
      • Vælg rullemenuen Slet under gruppen Cells værktøjer
      • Vælg Slet celler
      • Vælg Skift celler til venstre for at fjerne og omarrangere kolonner
      • Klik på OK
      • Vælg Skift celler op for at fjerne og omarrangere rækker
• Andre let at udføre sorteringsopgaver
• En sidste tanke

Den første metode involverer anvendelse af en VBA-makro.

1. Gå til din Excel-fil

2. Hold Alt og F11 sammen

3. Vent til vinduet Microsoft Visual Basic for Applications vises

4. Klik på Indsæt

5. Vælg modul

   

6. Indsæt de følgende kodelinjer i vinduet

Sub DeleteEmptyColumns()
'Updateby20140317
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 Then
rng.Delete
End If
Next
Application.ScreenUpdating = True
End Sub

1. Tryk på F5 for at kompilere og udføre makroen

2. Indtast det relevante arbejdsområde i dialogvinduet

Arbejdsområdet eller dataområdet er det specifikke interval mellem de kolonner, du vil målrette mod. Formatet er $ A $ 1: $ J $ 12. Bogstaverne svarer til kolonnen, og numrene svarer til rækkerne.

Hvis du trækker dette ud med musen eller ved at holde Shift nede og bruge piletasterne, vil du bemærke, at:

$ A $ 1 - Øverste hjørne

$ J $ 12 - Nederste hjørne

Du kan ikke vælge dataområdet, før du begynder at uploade makroen, da det ikke forbliver valgt.

Tryk på OK

Derefter skal alle de tomme kolonner slettes, og alle udfyldte kolonner skal være ved siden af ​​hinanden.

Brug af Excel-værktøjer

Naturligvis ville Excel ikke være sådan et kraftcenter, hvis det ikke havde store sorteringsevner. Du kan bruge rullemenuen Slet til at slette hele rækker, kolonner eller tomme celler.

1. Vælg først dataområdet

2. Tryk på F5

3. Klik på Special

   

4. Vælg Blanks indstilling

5. Klik på OK (dette valg sikrer, at alle tomme celler er valgt i det målrettede interval)

   

6. Gå til fanen Hjem

7. Vælg rullemenuen Slet under gruppen Cells værktøjer

8. Vælg Slet celler

   

9. Vælg Skift celler til venstre for at fjerne og omarrangere kolonner

10. Klik på OK

Nu skulle de tomme celler fra de tomme kolonner være forsvundet, og alle de andre rækker ville blive flyttet tættere sammen.

Du kan bruge den samme tilgang til at slette hele rækker. I stedet for at flytte cellerne til venstre vælger du imidlertid den anden mulighed.

Vælg Skift celler op for at fjerne og omarrangere rækker

Afhængig af hvilken version af Excel, du kører, får du muligvis forskellige formuleringer. Men under alle omstændigheder er de to øverste indstillinger i menuen Slet celler altid de samme.

Denne metode fjerner ikke længere alle tomme celler i markeringen. Før Excel 2013 ville dette utilsigtet fjerne endda tomme rækker, der generelt ville redde sorteringen.

Nu opstår problemet ikke længere. Derfor, hvis du også vil slippe af med rækkerne, kan du gøre det ved at vælge dataområdet igen og følge de forrige trin. Vælg derefter blot for at skifte eller slette celler op i stedet for til venstre.

Andre let at udføre sorteringsopgaver

Selvom det teknisk er lettere at bruge Excel-værktøjslinjen til at slette tomme kolonner og rækker, er VBA-makrometoden idiotsikker, hvilket betyder, at du kan bruge den selv i ældre Microsoft Excel-versioner.

Ved hjælp af det samme VBA-modul eller menuen Gå til, kan du gøre så meget mere i Excel. Har du visse formler, der ikke længere er relevante? - Du kan også fjerne dem eller omarrangere dem i overensstemmelse hermed.

Du kan også fjerne unødvendige kommentarer eller alle kommentarer fra dit projekt, hvis du ikke ønsker, at de skal vises under din præsentation. Se i VBA, hvis du vil være en Excel-strømbruger.

En sidste tanke

I årenes løb har en lang række tilføjelser vist online. Nogle af dem giver dig mulighed for at tage endnu flere genveje, når du sorterer store regneark. Imidlertid er disse apps sjældent gratis og det er ikke umagen værd for enkle opgaver, såsom at fjerne tomme rækker, celler og kolonner.

Hvis det desuden var så vanskeligt, ville Microsoft have forenklet processen yderligere nu eller skabt endnu mere omfattende guider til Excel-sortering.