Fonction Array
Renvoie une variable de type Variant contenant un tableau.
Syntaxe
Array(arglist)
L’argument arglist requis est une liste délimitée par des virgules de valeurs qui sont affectées aux éléments du tableau contenus dans le variant. Si aucun argument n’est spécifié, un tableau vide est créé.
Remarques
La notation utilisée pour faire référence à un élément d’un tableau se compose du nom de la variable suivi d’un numéro d’index entre parenthèses indiquant l’élément souhaité.
Dans l’exemple suivant, la première instruction crée une variable A comme une variable Variant. La deuxième instruction attribue un tableau à la variable A. La dernière instruction attribue la valeur contenue dans le deuxième élément de tableau à une autre variable.
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
La limite inférieure d’un tableau créé à l’aide de la fonction Array est déterminée par la limite inférieure spécifiée avec l’instruction Option Base, sauf si Array est qualifié avec le nom de la bibliothèque de types (par exemple, VBA.Array). Dans ce cas, Option Base n’a pas d’incidence sur Array.
Remarque
Une variable Variant qui n’est pas déclarée comme un tableau peut tout de même contenir un tableau. Une variable Variant peut contenir un tableau de n’importe quel type, à l’exception des tableaux de chaînes de longueur fixe et des types définis par l’utilisateur. Même si une variable Variant contenant un tableau est théoriquement différente d’un tableau dont les éléments sont de type Variant, les éléments de tableau sont accessibles de la même façon.
Exemple
Cet exemple utilise la fonction Array pour renvoyer une variable Variant contenant un tableau.
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".
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.