Jak usunąć wszystkie puste kolumny w programie Microsoft Excel

Istnieje wiele sposobów usuwania pustych kolumn w pliku Microsoft Excel. Dlaczego miałbyś to robić? - Prosty.

Zobacz także nasz artykuł Jak zamrozić górny wiersz w programie Excel

Od czasu do czasu dane importowane ze stron internetowych mogą powodować wyświetlanie dużej liczby kolumn, nawet jeśli nie są używane. Widać to tak samo często w przypadku plików CSV i plików .txt.

W takim przypadku ręczne usunięcie kolumn może nie zawsze być łatwe. Jasne, jeśli masz tylko dwie lub trzy puste kolumny, możesz je usunąć ręcznie. Ale co jeśli zaimportowany projekt utworzy 57 pustych i nieciągłych kolumn? - W tym celu potrzebujesz zautomatyzowanego procesu.

Korzystanie z makra VBA

Szybkie linki

• Korzystanie z makra VBA
  • • • Przejdź do pliku Excel
      • Przytrzymaj Alt i F11 razem
      • Poczekaj, aż pojawi się okno Microsoft Visual Basic for Applications
      • Kliknij Wstaw
      • Wybierz moduł
      • Wklej następujące wiersze kodu w oknie
      • Naciśnij klawisz F5, aby skompilować i wykonać makro
      • Wprowadź odpowiedni zakres pracy w oknie dialogowym
      • 1 USD 1 USD - górny róg
      • 12 USD 12 USD - Dolny róg
      • wciśnij OK
• Korzystanie z narzędzi Excela
  • • • Najpierw wybierz zakres danych
      • Naciśnij F5
      • Kliknij opcję Specjalne
      • Wybierz opcję Puste
      • Kliknij OK (ta opcja zapewni, że wszystkie puste komórki zostaną wybrane w docelowym zakresie)
      • Przejdź do zakładki Strona główna
      • Wybierz menu rozwijane Usuń w grupie narzędzi Komórki
      • Wybierz Usuń komórki
      • Wybierz Shift Cells Left, aby usunąć i zmienić kolejność kolumn
      • Kliknij OK
      • Wybierz Przesuń komórki w górę, aby usunąć i zmienić kolejność wierszy
• Inne łatwe do wykonania zadania sortowania
• Ostatnia myśl

Pierwsza metoda polega na użyciu makra VBA.

1. Przejdź do pliku Excel

2. Przytrzymaj Alt i F11 razem

3. Poczekaj, aż pojawi się okno Microsoft Visual Basic for Applications

4. Kliknij Wstaw

5. Wybierz moduł

   

6. Wklej następujące wiersze kodu w oknie

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. Naciśnij klawisz F5, aby skompilować i wykonać makro

2. Wprowadź odpowiedni zakres pracy w oknie dialogowym

Zakres roboczy lub zakres danych to konkretny odstęp między kolumnami, na które chcesz kierować reklamy. Format to $ A $ 1: $ J $ 12. Litery odpowiadają kolumnie, a cyfry odpowiadają wierszom.

Jeśli przeciągniesz to myszką lub przytrzymując Shift i używając klawiszy strzałek, zauważysz, że:

1 USD 1 USD - górny róg

12 USD 12 USD - Dolny róg

Nie możesz wybrać zakresu danych przed rozpoczęciem przesyłania makra, ponieważ nie zostanie ono wybrane.

wciśnij OK

Następnie wszystkie puste kolumny powinny zostać usunięte, a wszystkie wypełnione kolumny powinny znajdować się obok siebie.

Korzystanie z narzędzi Excela

Oczywiście Excel nie byłby tak potężny, gdyby nie miał wielkich umiejętności sortowania. Możesz użyć menu rozwijanego Usuń, aby usunąć całe wiersze, kolumny lub puste komórki.

1. Najpierw wybierz zakres danych

2. Naciśnij F5

3. Kliknij opcję Specjalne

   

4. Wybierz opcję Puste

5. Kliknij OK (ta opcja zapewni, że wszystkie puste komórki zostaną wybrane w docelowym zakresie)

   

6. Przejdź do zakładki Strona główna

7. Wybierz menu rozwijane Usuń w grupie narzędzi Komórki

8. Wybierz Usuń komórki

   

9. Wybierz Shift Cells Left, aby usunąć i zmienić kolejność kolumn

10. Kliknij OK

Teraz puste komórki z pustych kolumn powinny zniknąć, a wszystkie pozostałe rzędy zbliżyłyby się do siebie.

Możesz użyć tego samego podejścia, aby usunąć całe wiersze. Jednak zamiast przesuwać komórki w lewo, wybierasz inną opcję.

Wybierz Przesuń komórki w górę, aby usunąć i zmienić kolejność wierszy

W zależności od używanej wersji programu Excel możesz otrzymać różne sformułowania. Ale w każdym razie dwie górne opcje w menu Usuń komórki są zawsze takie same.

Ta metoda nie usuwa już wszystkich pustych komórek w zaznaczeniu. Przed Excel 2013 nieumyślnie usuwałoby to nawet puste wiersze, które generalnie popsułyby sortowanie.

Teraz problem już nie występuje. Dlatego jeśli chcesz również pozbyć się wierszy, możesz to zrobić, ponownie wybierając zakres danych i wykonując poprzednie kroki. Następnie wystarczy przesunąć lub usunąć komórki w górę zamiast w lewo.

Inne łatwe do wykonania zadania sortowania

Chociaż technicznie korzystanie z paska narzędzi Excela do usuwania pustych kolumn i wierszy wydaje się łatwiejsze, metoda makr VBA jest niezawodna, co oznacza, że ​​możesz jej używać nawet w starszych wersjach Microsoft Excel.

Korzystając z tego samego modułu VBA lub menu funkcji Idź do, możesz zrobić znacznie więcej w programie Excel. Czy masz pewne formuły, które nie są już istotne? - Możesz je również usunąć lub odpowiednio zmienić ich kolejność.

Możesz także usunąć niepotrzebne komentarze lub wszystkie komentarze ze swojego projektu, jeśli nie chcesz, aby pojawiały się podczas prezentacji. Zajrzyj do VBA, jeśli chcesz być zaawansowanym użytkownikiem programu Excel.

Ostatnia myśl

Przez lata w Internecie pojawiła się szeroka gama dodatków. Niektóre z nich pozwalają na jeszcze więcej skrótów podczas sortowania dużych arkuszy kalkulacyjnych. Jednak aplikacje te rzadko są bezpłatne i nie są warte kłopotu w przypadku prostych zadań, takich jak usuwanie pustych wierszy, komórek i kolumn.

Poza tym, gdyby było to tak trudne, Microsoft jeszcze bardziej uprościłby ten proces lub stworzył jeszcze obszerniejsze przewodniki na temat sortowania w Excelu.