Jak usunąć kolumny w vba (z przykładami)
Możesz użyć następujących metod, aby usunąć kolumny w Excelu za pomocą VBA:
Metoda 1: usuń kolumnę
SubDeleteColumns ()
Columns(" C ").Delete
End Sub
Ten konkretny przykład usunie kolumnę C z bieżącego skoroszytu.
Metoda 2: Usuń wszystkie kolumny z zakresu
SubDeleteColumns ()
Columns(" B:D ").Delete
End Sub
Ten konkretny przykład spowoduje usunięcie wszystkich kolumn z zakresu od B do D w bieżącym skoroszycie.
Metoda 3: Usuń wiele określonych kolumn
SubDeleteColumns ()
Range(" B:B,D:D ").Delete
End Sub
Ten konkretny przykład usunie kolumny B i D z bieżącego skoroszytu.
Poniższe przykłady pokazują, jak w praktyce zastosować każdą z tych metod z następującym zbiorem danych w Excelu:
Przykład 1: Usuń kolumnę w VBA
Możemy utworzyć następujące makro, aby usunąć tylko kolumnę C z naszego zbioru danych:
SubDeleteColumns ()
Columns(" C ").Delete
End Sub
Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:
Należy zauważyć, że ze zbioru danych usunięto tylko kolumnę C („Wspomaganie”).
Przykład 2: Usuń wszystkie kolumny z zakresu
Możemy utworzyć następujące makro, aby usunąć wszystkie kolumny z zakresu od B do D:
SubDeleteColumns ()
Columns(" B:D ").Delete
End Sub
Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:
Należy pamiętać, że każda kolumna pomiędzy B i D (kolumny „Punkty”, „Asysty” i „Zbiórki”) została usunięta ze zbioru danych.
Przykład 3: Usuń wiele określonych kolumn
Możemy utworzyć następujące makro, aby usunąć kolumny B i D ze zbioru danych:
SubDeleteColumns ()
Range(" B:B,D:D ").Delete
End Sub
Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:
Należy zwrócić uwagę, że kolumny B i D (kolumny „Punkty” i „Zbiórki”) zostały usunięte ze zbioru danych.
Dodatkowe zasoby
Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w VBA:
VBA: Jak policzyć liczbę wierszy w zakresie
VBA: Jak policzyć liczbę użytych kolumn
VBA: Jak znaleźć ostatnio używaną kolumnę