Zawartość
Czasami musimy znać liczbę wierszy używanych w arkuszu kalkulacyjnym Excel, abyśmy mogli utworzyć formułę lub nawet makro VBA. Na szczęście istnieje kilka dość prostych sposobów, aby to zrobić, a Excel VBA jest tylko jednym z nich.Najprostszym sposobem na znalezienie tej informacji jest przejście do dolnej części arkusza i wyświetlenie numeru po prawej stronie ostatniego punktu danych; jednak z VBA obliczenia te są niezwykle proste.
Instrukcje
Dzięki VBA obliczenie liczby wierszy w arkuszu programu Excel jest niezwykle proste (BananaStock / BananaStock / Getty Images)-
Otwórz arkusz programu Excel i edytor VBA, naciskając „Alt + F11”.
-
Uruchom nowy plik projektu VBA, klikając prawym przyciskiem myszy skoroszyt, wyświetlając go w menu po prawej stronie i wybierając „Nowy”.
-
Uruchom nową funkcję, wpisując „Sub CountRows ()”. To informuje kompilator VBA, że istnieje nowy podprogram dla pliku projektu. Jeśli wolisz zmienić nazwę podprogramu, zmień tekst „CountRows” na dowolną żądaną nazwę, po której muszą następować nawiasy pokazane powyżej, na przykład „YourName ()”.
-
Utwórz zmienną zawierającą tekst „Dim Count as Long” w następnym wierszu.
-
Wpisz następujący kod:
Count = 0 Count = Count + 1 ActiveCell.Offset (1, 0). Wybierz pętlę aż do IsEmpty (ActiveCell.Offset (0, 1))
Informuje to program kompilujący, że konieczne jest przeanalizowanie zmiennej Count, a następnie zliczenie wierszy całego arkusza. Kod dodaje zmienną do sumy całkowitej, a następnie przechodzi do następnej komórki, dopóki jest pusta. Gdy dotrze do pustej komórki, wykonanie zatrzymuje się.
-
Aktywuj pole tekstowe, dodając nowy wiersz z tekstem „Liczba MsgBox”. Spowoduje to wyświetlenie wyskakującego okienka z całkowitą liczbą wierszy. Aby uczynić pudełko bardziej użytecznym, możesz wprowadzić dowolny dodatkowy tekst. Zmień nazwę linii na:
MsgBox „Jest” [liczba zliczeń] „linie”
W razie potrzeby możesz zmienić tekst w cudzysłowie.
-
Na koniec wpisz „End Sub” w nowym wierszu, aby wyjść z funkcji podprogramu.
Planowanie makra
-
Wróć do arkusza programu Excel i zapisz go.
-
Zaznacz pierwszą komórkę kolumny, która zawiera największą liczbę danych. Ta kolumna nie powinna zawierać pustych komórek od góry do dołu.
-
Otwórz menu „Narzędzia” i wybierz „Makra”, aby wyświetlić okno dialogowe zawierające wszystkie makra zaprogramowane dla arkusza.
-
Wybierz makro utworzone w sekcji 1, o nazwie „CountRows” lub dowolnej innej podanej przez Ciebie nazwie, i kliknij „Uruchom”. Po zakończeniu makro wyświetli wyskakujące okienko z informacją o liczbie wypełnionych wierszy
Uruchamianie makra
Jak
- Jeśli potrzebujesz tylko numeru, łatwiejszą i prostszą alternatywą jest policzenie wierszy za pomocą formuły. W pustej komórce wpisz „= LICZBA (A: A, JEŻELI (A> 0,1,0))”, gdzie A jest kolumną, której liczba wierszy jest liczona.