Innholdsfortegnelse
Denne opplæringen vil lære deg hvordan du får lengden (størrelsen) på en matrise i VBA.
Få matriselengde
For å få lengden på en matrise, må du kjenne matrisens start- og sluttposisjoner. Du kan gjøre dette med VBAs UBound- og LBound -funksjoner.
LBound- og UBound -funksjoner
Denne prosedyren viser hvordan du bruker UBound- og LBound -funksjonene på en enkelt dimensjonsmatrise:
| 123456 | Sub UBoundLBound ()Dim exArr (1 til 4) som strengMsgBox UBound (exArr)MsgBox LBound (exArr)Slutt Sub |
Ved å trekke de to får du matriselengden (UBound - LBound +1).
Få Array Length -funksjon
Denne funksjonen vil beregne størrelsen (lengden) på en endimensjonal matrise:
| 1234567 | Offentlig funksjon GetArrLength (en som variant) så lengeIf IsEmpty (a) DaGetArrLength = 0EllersGetArrLength = UBound (a) - LBound (a) + 1Slutt omSluttfunksjon |
Få 2D Array -størrelse
Denne funksjonen vil beregne antall posisjoner i en todimensjonal matrise:
| 12345678910111213141516171819 | Sub testArrySize ()Dim arr2D (1 til 4, 1 til 4) så lengeMsgBox GetArrSize_2D (arr2D)Slutt SubOffentlig funksjon GetArrSize_2D (en som variant) så lengeDim x Så lenge, y Så lengeIf IsEmpty (a) DaGetArrSize_2D = 0Ellersx = UBound (a, 1) - LBound (a, 1) + 1y = UBound (a, 2) - LBound (a, 2) + 1GetArrSize_2D = x * ySlutt omSluttfunksjon |
