Wprowadzenie do długości tablicy VBA
Zasadniczo tablica to zestaw elementów, który ma dwa wymiary. W Excelu używamy tablic w naszym codziennym życiu. Aby obliczyć długość tablicy w programie Excel, robimy to ręcznie lub wykorzystujemy do tego niektóre funkcje. Ale jak uzyskać długość tablicy w Excel VBA? Używamy do tego dwóch osobnych funkcji. Funkcje Lbound i Ubound są używane do uzyskania długości tablicy w programie Excel VBA.
Omówiliśmy więc powyżej, że używamy funkcji Lbound i Ubound, aby uzyskać długość tablicy. Ale czym są funkcje Lbound i Ubound. Lbound oznacza dolną granicę, a Ubound oznacza górną granicę. Długość tablicy jest także identyfikowana przez funkcję arr. Length.
Najpierw zobaczmy, jak wygląda tablica. Spójrz na zrzut ekranu poniżej.
Powyżej znajduje się tablica z czterema rzędami i dwiema kolumnami. Jak znajdziemy długość tej tablicy lub inne rozmiary, których nauczymy się w tym temacie.
Po pierwsze, upewnij się, że mamy włączoną kartę programisty, abyśmy mogli korzystać z Excel VBA.
Jak korzystać z długości tablicy Excel VBA?
Spróbujmy teraz kilku przykładów, jak znaleźć długość tablicy w programie Excel VBA.
Możesz pobrać ten szablon Excel VBA Array Length tutaj - Szablon Excel VBA Array LengthPrzykład # 1 - Długość tablicy VBA
Po pierwsze, wyobraźmy sobie, że mamy rozmiar tablicy czterech elementów w każdym rzędzie i kolumnach, tj. Cztery rzędy i cztery kolumny. Zatem rozmiar tablicy wyniósłby 16. Długość tablicy jest obliczonym iloczynem szeregu wierszy i kolumn. Zróbmy to w Excel VBA.
Krok 1: Wejdź do edytora VB, przechodząc do zakładki programisty, a następnie klikając Visual Basic w następujący sposób.
Krok 2: Gdy wejdziemy do edytora VB, wstawmy nowy moduł, który otworzy dla nas okno kodu.
Krok 3: Kliknij dwukrotnie właśnie wstawiony moduł, który otworzy dla nas okno kodu. Teraz możemy zacząć pisać kod, deklarując funkcję podrzędną.
Kod:
Sub Sample () End Sub
Krok 4: Teraz zadeklaruj tablicę jako liczbę całkowitą w następujący sposób.
Kod:
Sub Sample () Dim arr (3, 3) As Integer End Sub
Krok 5: Teraz użyj konsoli. funkcja writeline i arr.length, aby znaleźć długość tablicy w następujący sposób.
Kod:
Sub Sample () Dim arr (3, 3) As Integer MsgBox Application.CountA (arr) End Sub
Krok 6: Kiedy uruchomimy powyższy kod, otrzymamy 16 jako wynik, ponieważ 16 jest długością liczby całkowitej.
Przykład # 2 - Długość tablicy VBA
W powyższej metodzie zastosowaliśmy metodę arr.length, która w wielu przypadkach nie jest idealna. Użyjemy tradycyjnej metody Lbound i Ubound, aby znaleźć długość tablicy. Mam niektóre dane w arkuszu 1 w następujący sposób.
Na powyższym zrzucie ekranu mamy tablicę i chcemy znaleźć jej rozmiar w VBA. Wykonamy podobne kroki z przykładu 1, jak wejść do edytora VB w następujący sposób.
Krok 1: Wejdź do edytora VB, przechodząc do zakładki programisty, a następnie klikając Visual Basic w następujący sposób.
Krok 2: Kliknij kartę Wstaw i dodaj nowy moduł.
Krok 3: Teraz możemy zacząć pisać kod, deklarując podfunkcję.
Kod:
Sub Sample1 () End Sub
Krok 4: Teraz najpierw musimy zadeklarować tablicę dla naszych danych powyżej i dwie kolejne liczby całkowite w następujący sposób.
Kod:
Sub Próbka 1 () Dim Grades (1 To 5, 1 To 2) As String, x As Integer, y As Integer End Sub
Krok 5: Teraz, gdy mamy rozmiar tablicy, podajemy górną i dolną granicę wymiaru za pomocą następującego kodu.
Kod:
Sub Sample1 () Dim Grades (1 To 5, 1 To 2) As String, x As Integer, y As Integer x = UBound (Grades, 1) - LBound (Grades, 1) + 1 y = UBound (Grades, 2) - LBound (stopnie, 2) + 1 Sub Sub
Krok 6: Teraz użyjmy funkcji Msgbox, aby wyświetlić rozmiar tablicy z powyższych danych.
Kod:
Sub Sample1 () Dim Grades (1 To 5, 1 To 2) As String, x As Integer, y As Integer x = UBound (Grades, 1) - LBound (Grades, 1) + 1 y = UBound (Grades, 2) - LBound (stopnie, 2) + 1 MsgBox „Ta tablica ma” i x * y i „Dane” End Sub
Krok 7: Teraz uruchom kod z przycisku uruchamiania lub naciśnij F5. Po uruchomieniu kodu widzimy następujący wynik:
Teraz możemy sprawdzić na podstawie danych, że ma 5 wierszy i dwie kolumny, a każda komórka ma jedno dane, więc w sumie jest 10 danych.
Przykład # 3 - Długość tablicy VBA
Teraz spróbujmy znaleźć rozmiar tablicy w innym przykładzie. Teraz mamy dane w innym arkuszu.
Teraz dane mają jeszcze jeden wiersz z powyższego przykładu 2. Spróbujmy ustalić rozmiar tej tablicy. Wykonaj następujące kroki,
Krok 1: Wejdź do edytora VB, przechodząc do zakładki programisty, a następnie klikając Visual Basic w następujący sposób,
Krok 2: Kliknij dwukrotnie właśnie wstawiony moduł, który otworzy dla nas okno kodu. Teraz możemy zacząć pisać kod, deklarując funkcję podrzędną.
Kod:
Sub Sample2 () End Sub
Krok 3: Teraz podobnie zadeklaruj tablicę i dwie różne zmienne jako liczby całkowite.
Kod:
Sub Sample2 () Dim Dept (1 To 6, 1 To 2) As String, x As Integer, y As Integer End Sub
Krok 4: Teraz użyj funkcji Lbound i Ubound, aby znaleźć rozmiar tablicy w następujący sposób.
Kod:
Sub Sample2 () Dim Dept (1 To 6, 1 To 2) As String, x As Integer, y As Integer x = UBound (Dept, 1) - LBound (Dept, 1) + 1 y = UBound (Dept, 2) - LBound (Dept, 2) + 1 End Sub
Krok 5: Teraz użyj funkcji Msgbox, aby wyświetlić rozmiar tablicy.
Kod:
Sub Sample2 () Dim Dept (1 To 6, 1 To 2) As String, x As Integer, y As Integer x = UBound (Dept, 1) - LBound (Dept, 1) + 1 y = UBound (Dept, 2) - LBound (Dept, 2) + 1 MsgBox „Ten rozmiar tablicy to” & x * y End Sub
Krok 6: Po uruchomieniu kodu otrzymujemy następujący wynik:
Rzeczy do zapamiętania
Jest kilka rzeczy, o których musimy pamiętać w przypadku długości tablicy VBA w następujący sposób:
- Aby znaleźć długość tablicy, musimy ją najpierw zadeklarować.
- Używamy funkcji Lbound i Ubound, aby znaleźć długość tablicy.
- Tablica to zestaw elementów w dwóch wymiarach.
Wniosek
- Teraz, jak już wcześniej omawialiśmy, czym jest tablica. Jest to zestaw elementów w dwóch wymiarach. Tak więc w programie Excel VBA możemy użyć funkcji Lbound i Ubound, aby znaleźć rozmiar długości tablicy.
- Jak obliczyć rozmiar tablicy. Jest to iloczyn liczby wierszy do liczby kolumn.
- Jak korzystać z funkcji długości tablicy VBA.
- W powyższych przykładach nauczyliśmy się korzystać z funkcji Ubound i Lbound w następujący sposób.
- UBound (Array, 1) - LBound (Array, 1) + 1
Polecane artykuły
Jest to przewodnik po długości tablicy VBA. Tutaj omówiliśmy, jak używać Excel VBA Array Length wraz z praktycznymi przykładami i szablonem Excela do pobrania. Możesz także przejrzeć nasze inne sugerowane artykuły -
- Praca z VBA Active Cell
- Usuwanie wiersza w VBA
- Jak korzystać z transpozycji Excel VBA?
- Jak naprawić błąd 1004 przy użyciu VBA