Sprawdź liczbę wierszy i kolumn w tabeli za pomocą makra VBA

Spisie treści

Jak używać makra VBA, aby dowiedzieć się, ile wierszy i kolumn jest używanych w tabeli Excel?

W zależności od wersji Excela w tabeli oferowana jest inna liczba wierszy i kolumn. Jak rozpoznać w makrze, że chcesz wykonać iterację po wszystkich wierszach lub kolumnach tabeli?

Podczas gdy w programie Excel do wersji 2003 włącznie było tylko 256 kolumn i 65 536 wierszy, od programu Excel 2007 dostępnych jest 16 384 kolumn i 1 048 576 wierszy.

Istnieją również różne formaty przechowywania w programie Excel dla dwóch różnych arkuszy kalkulacyjnych: XLS i XLSX. Jednak nie jest tak, że plik XLSX musi automatycznie zawierać arkusze o większym rozmiarze. Nawet w programach Excel 2007 i Excel 2010, gdy plik jest otwierany w trybie zgodności, dostępne są tylko wcześniejsze wymiary tabeli.

Dlatego jeśli chcesz określić w makrze, ile wierszy i kolumn ma arkusz, powinieneś zapytać o tę liczbę bezpośrednio. Poniższe makro pokazuje, jak to zrobić

Numer podrzędny i podrzędny ()
MsgBox ActiveSheet.Cells.Rows.Count & "Wiersze" & _
ActiveSheet.Cells.Columns.Count & "Kolumny".
Napis końcowy

Jeśli wywołasz makro z arkuszem XLS, program Excel wyświetli odpowiednią liczbę wierszy i kolumn, jak pokazano na poniższym rysunku:

Jeśli uruchomisz makro z programu Excel 2007 lub Excel 2010 bez trybu zgodności, okno dialogowe pokazuje większe wymiary tabeli:

W pętlach VBA, które mają przebiegać przez wszystkie komórki tabeli, można użyć dwóch właściwości ROWS.COUNT i COLUMNS.COUNT zgodnie z opisem, aby określić wymiary arkusza.

Przejście przez wszystkie teoretycznie dostępne komórki za pomocą makra może zająć dużo czasu (szczególnie w Excel 2007 i Excel 2010). Jeśli chcesz ograniczyć pętle tylko do używanego obszaru, zalecamy zamiast tego użycie właściwości USEDRANGE.

Aby wprowadzić makro, naciśnij kombinację klawiszy ALT F11 w programie Excel. To uruchamia edytor VBA we wszystkich wersjach programu Excel. Tam wybierz polecenie WSTAW - MODUŁ i wprowadź makro. Aby uruchomić makro, aktywuj kombinację klawiszy ALT F8 w programie Excel.

Będziesz pomóc w rozwoju serwisu, dzieląc stronę ze swoimi znajomymi

wave wave wave wave wave