Indholdsfortegnelse
Denne vejledning lærer dig, hvordan du får længden (størrelsen) af et array i VBA.
Få Array længde
For at få længden af et array skal du kende arrayets start- og slutpositioner. Du kan gøre dette med VBAs UBound- og LBound -funktioner.
LBound og UBound funktioner
Denne procedure demonstrerer, hvordan du bruger UBound- og LBound -funktionerne på et enkeltdimensionsarray:
123456 | Sub UBoundLBound ()Dim exArr (1 til 4) som strengMsgBox UBound (exArr)MsgBox LBound (exArr)Afslut Sub |
Ved at fratrække de to får du matrixlængden (UBound - LBound +1).
Få Array Length -funktion
Denne funktion beregner størrelsen (længden) af et endimensionalt array:
1234567 | Offentlig funktion GetArrLength (a som variant) så længeHvis er tom (a) SåGetArrLength = 0AndetGetArrLength = UBound (a) - LBound (a) + 1Afslut HvisAfslut funktion |
Få 2D Array -størrelse
Denne funktion beregner antallet af positioner i et todimensionalt array:
12345678910111213141516171819 | Sub testArrySize ()Dim arr2D (1 til 4, 1 til 4) så længeMsgBox GetArrSize_2D (arr2D)Afslut SubOffentlig funktion GetArrSize_2D (a som variant) så længeDim x Så længe, y Så længeHvis er tom (a) SåGetArrSize_2D = 0Andetx = UBound (a, 1) - LBound (a, 1) + 1y = UBound (a, 2) - LBound (a, 2) + 1GetArrSize_2D = x * yAfslut HvisAfslut funktion |