Return to VBA Code Examples

Die VBA-Funktionen UBound und LBound

Beschreibung von UBound

Liefert den höchsten Index für eine Dimension eines Arrays.

Einfache UBound-Beispiele

Sub UBound_Beispiel()
    Dim a(3 To 10) As Integer
    MsgBox UBound(a)
End Sub

Ergebnis: 10

UBound-Syntax

UBound(ArrayName, [Dimension])

Die UBound-Funktion enthält 2 Argumente:

ArrayName: Name der Array-Variable.

Dimension: [Optional]: Eine Ganzzahl, die angibt, von welcher Dimension die obere Grenze zurückgegeben wird. Verwenden Sie 1 für die erste Dimension, 2 für die zweite, usw. (1 wenn weggelassen).

 

Beispiele für die Excel-VBA-Funktion UBound

Sub UBound_Beispiel1()
    Dim arrWert(1 To 5, 4 To 8, 12 To 25)
    MsgBox UBound(arrWert)
    MsgBox UBound(arrWert, 1)
    MsgBox UBound(arrWert, 2)
    MsgBox UBound(arrWert, 3)
End Sub

Ergebnis: 5, 5, 8, 25

Beschreibung von LBound

Gibt den niedrigsten Index für eine Dimension eines Arrays zurück.

Einfache LBound-Beispiele

Sub LBound_Beispiel()
    Dim a(3 To 10) As Integer
    MsgBox LBound(a)
End Sub

Ergebnis: 3

LBound-Syntax

LBound(ArrayName, [Dimension])

Die Funktion LBound enthält 2 Argumente:

ArrayName: Name der Array-Variable.

Dimension: [Optional]: Eine Ganzzahl, die angibt, von welcher Dimension die untere Grenze zurückgegeben wird. Verwenden Sie 1 für die erste Dimension, 2 für die zweite, usw. (1 wenn weggelassen).

 

Beispiele für die Excel-VBA-Funktion LBound

Sub LBound_Beispiel1()
    Dim arrWert(1 To 5, 4 To 8, 12 To 25)
    MsgBox LBound(arrWert)
    MsgBox LBound(arrWert, 1)
    MsgBox LBound(arrWert, 2)
    MsgBox LBound(arrWert, 3)
End Sub

Ergebnis: 1, 1, 4, 12

vba-free-addin

Add-In für VBA-Code-Beispiele

Auf alle Code-Beispiele aus unserer Website einfach zugreifen.

Navigieren Sie einfach zum Menü, klicken Sie darauf und der Code wird direkt in Ihr Modul eingefügt. .xlam add-in.

(Keine Installation erforderlich!)

Kostenloser Download

Return to VBA Code Examples