Array-Funktion
Gibt eine Variante zurück, die ein Array enthält.
Syntax
Array(arglist)
Das erforderliche Argument arglist ist eine durch Trennzeichen getrennte Liste von Werten, die den Elementen des Arrays zugewiesen sind, die in Variant enthalten sind. Wenn keine Argumente angegeben werden, wird ein Array der Länge 0 erstellt.
Hinweise
Die zum Verweisen auf ein Element eines Arrays verwendete Notation besteht aus dem Variablennamen gefolgt von Klammern, die eine Indexnummer enthalten, die das gewünschte Element angibt.
Im folgenden Beispiel erstellt die erste Anweisung eine Variable namens A
als Variante. Die zweite Anweisung weist der Variablen A
eine Matrix zu. Die letzte Anweisung weist den im zweiten Arrayelement enthaltenen Wert einer anderen Variablen zu.
Dim A As Variant, B As Long, i As Long
A = Array(10, 20, 30) ' A is a three element list by default indexed 0 to 2
B = A(2) ' B is now 30
ReDim Preserve A(4) ' Extend A's length to five elements
A(4) = 40 ' Set the fifth element's value
For i = LBound(A) To UBound(A)
Debug.Print "A(" & i & ") = " & A(i)
Next i
Die untere Grenze eines Arrays, das mithilfe der Array-Funktion erstellt wird, wird durch die untere Grenze festgelegt, die mit der Anweisung Option Base angegeben wurde, wenn Array nicht mit dem Namen der Typbibliothek (beispielsweise VBA.Array) qualifiziert ist. Wenn Array mit dem Namen der Typbibliothek qualifiziert ist, wird es von Option Base nicht beeinflusst.
Hinweis
Eine Variante, die nicht als Array deklariert wird, kann dennoch ein Array enthalten. Eine Variant-Variable kann ein Array eines beliebigen Typs enthalten, mit Ausnahme von Zeichenfolgen mit fester Länge und benutzerdefinierter Typen. Eine Variante mit einem Array unterscheidet sich konzeptuell zwar von einem Array, dessen Elemente den Typ Variant aufweisen, auf die Arrayelemente wird aber auf die gleiche Weise wie die Arrayelemente zugegriffen.
Beispiel
In diesem Beispiel wird die Array -Funktion verwendet, um eine Variante zurückzugeben, die ein Array enthält.
Dim MyWeek, MyDay
MyWeek = Array("Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun")
' Return values assume lower bound set to 1 (using Option Base
' statement).
MyDay = MyWeek(2) ' MyDay contains "Tue".
MyDay = MyWeek(4) ' MyDay contains "Thu".
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.