Aby uzyskać rozmiar tablicy w Excel VBA, możesz korzystać z funkcji UBound i LBound.
Umieść przycisk polecenia w arkuszu i dodaj następujące wiersze kodu:
1. Najpierw musimy zadeklarować tablicę. Nasza tablica ma dwa wymiary. Składa się z 5 wierszy i 2 kolumn. Zadeklaruj również dwie zmienne typu Integer.
Filmy przyciemnione (1 do 5, 1 do 2) jako ciąg, x jako liczba całkowita, y jako liczba całkowita
Tablica może wyglądać tak.
2. Następnie otrzymujemy rozmiar tablicy. Dodaj następujące wiersze kodu:
x = UBound(filmy, 1) - LBound(filmy, 1) + 1
y = UBound(Films, 2) - LBound(Films, 2) + 1
UBound(Films, 1) podaje górną granicę pierwszego wymiaru, która wynosi 5.
LBound(Films, 1) daje dolną granicę pierwszego wymiaru, która wynosi 1.
UBound(Films, 2) podaje górną granicę drugiego wymiaru, która wynosi 2.
LBound(Films, 2) daje dolną granicę drugiego wymiaru, która wynosi 1.
W rezultacie x równa się 5, a y równa się 2.
3. Używamy MsgBox do wyświetlenia liczby elementów tablicy.
MsgBox "Ta tablica składa się z elementów " & x * y & ""
Wynik:
