Ten przykład nauczy Cię, jak wybierać całe wiersze i kolumny w Excelu VBA. Czy jesteś gotowy?

Zamieść przycisk polecenia na swoim arkuszu i dodaj następujące linie kodu:

1. Poniższy wiersz kodu zaznacza cały arkusz.

Komórki.Wybierz

Wszystkie arkusze w Excelu VBA

Uwaga: ponieważ umieściliśmy nasz przycisk polecenia na pierwszym arkuszu, ten wiersz kodu zaznacza cały pierwszy arkusz. Aby zaznaczyć komórki na innym arkuszu, musisz najpierw aktywować ten arkusz. Na przykład poniższe linie kodu zaznaczają cały drugi arkusz.

Worksheets(2).Activate
Worksheets(2).Cells.Select

2. Poniższa linia kodu zaznacza drugą kolumnę.

Columns(2).Select

Kolumna

3. Poniższy wiersz kodu zaznacza siódmy wiersz.

Rows(7).Select

Row

4. Aby wybrać wiele wierszy, dodaj linię kodu jak poniżej:

Rows(„5:7”).Select

Multiple Rows

5. Aby wybrać wiele kolumn, dodaj linię kodu, jak poniżej:

Columns(„B:E”).Select

Multiple Columns

6. Uważaj, aby nie pomylić właściwości Rows and Columns z właściwościami Row i Column. Właściwości Rows i Columns zwracają obiekt Range. Właściwości Row i Column zwracają pojedynczą wartość.

Linia kodu:

MsgBox Cells(5, 2).Row

Wynik:

Właściwość Row

7. Zaznacz komórkę D6. Poniższy wiersz kodu wybiera cały wiersz aktywnej komórki.

ActiveCell.EntireRow.Select

WłasnośćEntireRow

Uwaga: granica tylko dla ilustracji.

8. Wybierz komórkę D6. Poniższy wiersz kodu wprowadza wartość 2 do pierwszej komórki kolumny, w której znajduje się komórka aktywna.

ActiveCell.EntireColumn.Cells(1).Value = 2

EntireColumn

Uwaga: obramowanie tylko w celach ilustracyjnych.

9. Zaznacz komórkę D6. Poniższy wiersz kodu wprowadza wartość 3 do pierwszej komórki wiersza poniżej wiersza zawierającego aktywną komórkę.

ActiveCell.EntireRow.Offset(1, 0).Cells(1).Value = 3

EntireRow + Offset

Uwaga: obramowanie tylko do celów ilustracyjnych.

Wyjaśnienie: obramowanie do celów ilustracyjnych.

Dodaj komentarz

Twój adres email nie zostanie opublikowany. Pola, których wypełnienie jest wymagane, są oznaczone symbolem *