Funktion VBA: UBound

Beschreibung

Die Funktion VBA UBound gibt den größten verfügbaren Index für das angegebene Array zurück.

Syntax UBound

UBound(array)

Oder

UBound(Array, Dimension)

Beispiel VBA UBound

Verwenden Sie die Funktion UBound, um den Index jeder der beiden Dimensionen des Arrays abzurufen:

Sub UBoundExample1()

     Dim array(10, 4)
    
     'Der maximale Index der ersten Dimension
     MsgBox UBound(array) 'Rückgabe: 10
    
     'Der maximale Index der zweiten Dimension
     MsgBox UBound(array, 2) 'Rückgabe: 4

End Sub

Verwenden Sie die Funktion UBound, um die Anzahl der Werte im Array zu erhalten, das von der Funktion SPLIT erstellt wurde:

Sub UBoundExample2()

     link = "www.moonexcel.com.ua"
    
     'Aufteilen einer Zeichenfolge in ein Array
     array = Split(link, ".")
    
     'Anzahl der Array-Elemente (wobei bekannt ist, dass das Array bei 0 beginnt)
     number = UBound(array) + 1
    
     'Zeigt die Anzahl der Array-Elemente an
     MsgBox number 'Rückgabe: 4

End Sub