Tartalomjegyzék
Ez az oktatóanyag megtanítja, hogyan lehet megszerezni egy tömb hosszát (méretét) a VBA -ban.
Tömb hossza
Annak érdekében, hogy megkapja a tömb hosszát, ismernie kell a tömb kezdő és véghelyzetét. Ezt megteheti a VBA UBound és LBound funkcióival.
LBound és UBound funkciók
Ez az eljárás bemutatja, hogyan lehet az UBound és az LBound függvényeket egyetlen dimenziós tömbön használni:
| 123456 | Sub UBoundLBound ()Dim exArr (1 -től 4 -ig) karakterlánckéntMsgBox UBound (exArr)MsgBox LBound (exArr)End Sub |
A kettő kivonása megadja a tömb hosszát (UBound - LBound +1).
Tömbhossz függvény lekérése
Ez a funkció kiszámítja az egydimenziós tömb méretét (hosszát):
| 1234567 | Nyilvános funkció GetArrLength (változatként), ameddigHa IsEmpty (a) AkkorGetArrLength = 0MásGetArrLength = UBound (a) - LBound (a) + 1Vége HaVége funkció |
Szerezzen 2D tömb méretet
Ez a függvény kiszámítja a kétdimenziós tömb pozícióinak számát:
| 12345678910111213141516171819 | Rész tesztArrySize ()Dim arr2D (1 -től 4 -ig, 1 -től 4 -ig)MsgBox GetArrSize_2D (arr2D)End SubNyilvános függvény GetArrSize_2D (a változatként), ameddigDim x Amilyen hosszú, y Olyan hosszúHa IsEmpty (a) AkkorGetArrSize_2D = 0Másx = UBound (a, 1) - LBound (a, 1) + 1y = UBound (a, 2) - LBound (a, 2) + 1GetArrSize_2D = x * yVége HaVége funkció |
