Ten samouczek pokaże, jak wybierać i pracować z całymi wierszami lub kolumnami w VBA.
Najpierw omówimy, jak zaznaczać całe wiersze i kolumny, następnie pokażemy, jak manipulować wierszami i kolumnami.
Wybierz całe wiersze lub kolumny
Wybierz pojedynczy wiersz
Możesz wybrać cały wiersz za pomocą Obiekt wierszy lubię to:
1 | Wiersze (5). Wybierz |
Lub możesz użyć Cały rząd razem z Zasięg lub Obiekty komórek:
1 | Zakres("B5").Cały wiersz.Wybierz |
lub
1 | Komórki(5,1).Cały wiersz.Wybierz |
Możesz także użyć Obiekt zakresu odnosić się konkretnie do wiersza:
1 | Zakres("5:5").Wybierz |
Wybierz pojedynczą kolumnę
Zamiast tego Obiekt wierszy, Użyj Kolumny Obiekt aby wybrać kolumny. Tutaj możesz odwołać się do kolumny numer 3:
1 | Kolumny(3).Wybierz |
lub literę „C”, otoczoną cytatami:
1 | Kolumny("C").Wybierz |
Zamiast Cały rząd, posługiwać się Cała kolumna razem z Zasięg lub Obiekty komórek aby wybrać całe kolumny:
1 | Zakres("C5").Cała kolumna.Wybierz |
lub
1 | Komórki(5,3).Cała kolumna.Wybierz |
Możesz także użyć Obiekt zakresu odnosić się konkretnie do kolumny:
1 | Zakres("B:B").Wybierz |
Wybierz wiele wierszy lub kolumn
Zaznaczanie wielu wierszy lub kolumn działa dokładnie tak samo, gdy używasz EntireRow lub EntireColumn:
1 | Zakres("B5:D10").Cały wiersz.Wybierz |
lub
1 | Zakres("B5:B10").Cała kolumna.Wybierz |
Jednak w przypadku korzystania z obiektów Wiersze lub Kolumny należy w cudzysłowie wprowadzić numery wierszy lub litery kolumn:
1 | Wiersze("1:3").Wybierz |
lub
1 | Kolumny("B:C").Wybierz |
Wybierz wiersz lub kolumnę ActiveCell
Aby wybrać wiersz lub kolumnę ActiveCell, możesz użyć jednego z następujących wierszy kodu:
1 | ActiveCell.Cały wiersz.Wybierz |
lub
1 | ActiveCell.Cała kolumna.Wybierz |
Wybierz wiersze i kolumny w innych arkuszach roboczych
Aby wybrać wiersze lub kolumny w innych arkuszach, musisz najpierw wybrać arkusz.
12 | Arkusze("Arkusz2").WybierzWiersze(3).Wybierz |
To samo dotyczy wybierania wierszy lub kolumn w innych skoroszytach.
123 | Skoroszyty("Book6.xlsm").AktywujArkusze("Arkusz2").WybierzWiersze(3).Wybierz |
Uwaga: musisz Aktywuj żądany skoroszyt. w przeciwieństwie do Arkusze obiektu, ten Obiekt skoroszytu nie ma Wybierz metodę.
Czy wybieranie wierszy i kolumn jest konieczne?
Jednak (prawie?) Nigdy nie jest konieczne wybieranie wierszy lub kolumn. Nie musisz wybierać wiersza lub kolumny, aby z nimi wchodzić w interakcję. Zamiast tego możesz zastosować metody lub właściwości bezpośrednio do wierszy lub kolumn. W kilku następnych sekcjach przedstawiono różne metody i właściwości, które można zastosować.
Możesz użyć dowolnej metody wymienionej powyżej, aby odwołać się do wierszy lub kolumn.
Metody i właściwości wierszy i kolumn
Usuń całe wiersze lub kolumny
Aby usunąć wiersze lub kolumny, użyj Usuń metodę:
1 | Wiersze("1:4").Usuń |
lub:
1 | Kolumny("A:D").Usuń |
Wstaw wiersze lub kolumny
Użyj Metoda wstawiania aby wstawić wiersze lub kolumny:
1 | Wiersze("1:4").Wstaw |
lub:
1 | Kolumny("A:D").Wstaw |
Kopiuj i wklej całe wiersze lub kolumny
Wklej do istniejącego wiersza lub kolumny
Podczas kopiowania i wklejania całych wierszy lub kolumn musisz zdecydować, czy chcesz wkleić istniejący wiersz/kolumnę, czy też chcesz wstawić nowy wiersz/kolumnę, aby wkleić swoje dane.
Te pierwsze przykłady skopiują i wkleją istniejący wiersz lub kolumnę:
1 | Zakres("1:1").Zakres kopiowania("5:5") |
lub
1 | Zakres("C:C").Zakres kopiowania("E:E") |
Wstaw i wklej
Następne przykłady zostaną wklejone do nowo wstawionego wiersza lub kolumny.
Spowoduje to skopiowanie wiersza 1 i wstawienie go do wiersza 5, przesuwając istniejące wiersze w dół:
12 | Zakres ("1:1").KopiujZakres("5:5").Wstaw |
Spowoduje to skopiowanie kolumny C i wstawienie jej do kolumny E, przesuwając istniejące kolumny w prawo:
12 | Zakres("C:C").KopiujZakres("E:E").Wstaw |
Ukryj / odkryj wiersze i kolumny
Aby ukryć wiersze lub kolumny, ustaw ich Ukryte właściwości do Prawdy. Użyj False, aby ukryć wiersze lub kolumny:
12345 | „Ukryj wiersze”Wiersze("2:3").CałyRow.Ukryty = Prawda„Pokaż wiersze”Wiersze("2:3").CałyRow.Ukryte = Fałsz |
lub
12345 | „Ukryj kolumny”Columns("B:C").EntireColumn.Hidden = True„Pokaż kolumny”Columns("B:C").EntireColumn.Hidden = False |
Grupuj / Rozgrupuj wiersze i kolumny
Jeśli chcesz pogrupować wiersze (lub kolumny), użyj kodu takiego:
12345 | „Grupuj wiersze”Wiersze("3:5").Grupa„Grupuj kolumny”Kolumny("C:D").Grupa |
Aby usunąć grupowanie, użyj tego kodu:
12345 | „Rozgrupuj wiersze”Wiersze("3:5").Rozgrupuj„Rozgrupuj kolumny”Kolumny("C:D").Rozgrupuj |
Spowoduje to rozwinięcie wszystkich „zgrupowanych” poziomów konspektu:
1 | ActiveSheet.Outline.ShowLevels RowLevels:=8, ColumnLevels:=8 |
a to spowoduje zwinięcie wszystkich poziomów konspektu:
1 | ActiveSheet.Outline.ShowLevels RowLevels:=1, ColumnLevels:=1 |
Ustaw wysokość wiersza lub szerokość kolumny
Aby ustawić szerokość kolumny, użyj tego wiersza kodu:
1 | Kolumny("A:E").ColumnWidth = 30 |
Aby ustawić wysokość wiersza, użyj tego wiersza kodu:
1 | Wiersze("1:1").Wysokość wiersza = 30 |
Automatycznie dopasuj wysokość wiersza / szerokość kolumny
Aby automatycznie dopasować kolumnę:
1 | Kolumny("A:B").Autofit |
Aby automatycznie dopasować wiersz:
1 | Wiersze("1:2").Autodopasowanie |
Wiersze i kolumny w innych arkuszach lub skoroszytach
Aby wchodzić w interakcje z wierszami i kolumnami w innych arkuszach, musisz zdefiniować Arkusze obiektu:
1 | Arkusze("Arkusz2").Rows(3).Insert |
Podobnie, aby wchodzić w interakcje z wierszami i kolumnami w innych skoroszytach, należy również zdefiniować Obiekt skoroszytu:
1 | Skoroszyty("book1.xlsm").Sheets("Arkusz2").Rows(3).Insert |
Uzyskaj aktywny wiersz lub kolumnę
Aby uzyskać aktywny wiersz lub kolumnę, możesz użyć Wiersz oraz Właściwości kolumny z Obiekt ActiveCell.
1 | MsgBox ActiveCell.Row |
lub
1 | MsgBox ActiveCell.Column |
Działa to również z Obiekt zakresu:
1 | Zakres MsgBox("B3").Kolumna |