UBound, functie

Opmerking: We willen u graag zo snel mogelijk de meest recente Help-inhoud in uw eigen taal bieden. Deze pagina is automatisch vertaald en kan grammaticale fouten of onnauwkeurigheden bevatten. Wij hopen dat deze inhoud nuttig voor u is. Kunt u ons onder aan deze pagina laten weten of de informatie nuttig voor u was? Hier is het Engelstalige artikel ter referentie.

Deze functie retourneert een waarde van het gegevenstype Lang die het grootst beschikbare subscript aangeeft voor de opgegeven dimensie van een matrix.

Syntaxis

UBound ( matrixnaam [, dimensie ] )

De syntaxis van de functie UBound heeft deze argumenten:

Argument

Beschrijving

matrixnaam

Vereist. De naam van de matrixvariabele; volgt de standaardnaamgevingsregels voor variabelen.

dimensie

Optioneel. Variant (Lang). Een geheel getal dat aangeeft voor welke dimensie de bovengrens wordt geretourneerd. Gebruik 1 voor de eerste dimensie, 2 voor de tweede, enzovoort. Als u dimensie weglaat, wordt 1 gebruikt.


Opmerkingen

De functie UBound wordt gebruikt met de functie LBound om de grootte van een matrix te bepalen. Gebruik de functie LBound om de ondergrens van een matrixdimensie te vinden.

UBound retourneert de volgende waarden voor een matrix met deze dimensies:

Dim A(1 To 100, 0 To 3, -3 To 4)

Instructie

Retourwaarde

UBound(A, 1)

100

UBound(A, 2)

3

UBound(A, 3)

4


Voorbeeld

Opmerking: In de volgende voorbeelden wordt het gebruik van deze functie in een VBA-module (Visual Basic for Applications) toegelicht. Meer informatie over het werken met VBA vindt u door in de vervolgkeuzelijst naast Zoeken de optie Referentie voor ontwikkelaars te selecteren en een of meer termen in het zoekvenster te typen.

In dit voorbeeld wordt de functie UBound gebruikt om het grootst beschikbare subscript te bepalen voor de opgegeven dimensie van een matrix.

Dim Upper
' Declare array variables.
Dim MyArray(1 To 10, 5 To 15, 10 To 20)
Dim AnyArray(10)
Upper = UBound(MyArray, 1) ' Returns 10.
Upper = UBound(MyArray, 3) ' Returns 20.
Upper = UBound(AnyArray) ' Returns 10.
Uw Office-vaardigheden uitbreiden
Training verkennen
Als eerste nieuwe functies krijgen
Deelnemen aan Office Insiders

Was deze informatie nuttig?

Bedankt voor uw feedback.

Hartelijk dank voor uw feedback! Het lijkt ons een goed idee om u in contact te brengen met een van onze Office-ondersteuningsagents.

×