Office: (Office 2016) VBA - Mehrdimensionale Array - Wie L & Ubound jeder Dimension auslesen

Hallo,

mal eine bescheidene Frage zum Thema mehrdimensionale Arrays.
Wie kann man den LBound und Ubound von einem z.B. 2-dimensionalen Array herausfinden?
Wie macht man das für die erste und zweite Dimension bewerkstelligen?

Mein Ziel ist es zwei For Schleifen in einander zupacken und damit die Werte rauszuschreiben.

Schöne Grüße
Tauchmann

 

Hallo Tauchmann,

angenommen, es handelt sich um folgendes Codefragment:

Code:

Sub ttt()
  Dim A(3 To 5, 8 To 10)
  Debug.Print "Dim1: Untere Grenze:"; LBound(A, 1), "Obere Grenze:"; UBound(A, 1)
  Debug.Print "Dim2: Untere Grenze:"; LBound(A, 2), "Obere Grenze:"; UBound(A, 2)
End Sub

Dieser Code gibt die Grenzen des Arrays A im Direktbereich aus, wie folgt:

Code:

Dim1: Untere Grenze: 3      Obere Grenze: 5 
Dim2: Untere Grenze: 8      Obere Grenze: 10 

 

HAllo Exl121150,

habe es gerade ausprobiert und es funktioniert super.
Danke für deine Hilfe :)

Tauchmann