Re : Tableau dynamique à plusieurs éléments
Bonjour bvdv
les tableaux ca marche bien
en faisant Alt F11 puis F1 on obtient ceci
Utilisation des tableaux
Voir aussi Particularités
Vous pouvez déclarer un tableau pour traiter un ensemble de valeurs du même type de données. Un tableau est une variable simple comportant de nombreux compartiments permettant de stocker autant de valeurs, par opposition à une variable classique dotée d'un compartiment destiné à une seule valeur. Vous pouvez faire référence au tableau globalement lorsque vous souhaitez faire référence à toutes les valeurs qu'il contient, ou faire référence à ses éléments individuels.
Par exemple, pour stocker les dépenses quotidiennes de chaque jour de l'année, vous pouvez déclarer une variable tableau comportant 365 éléments plutôt que de déclarer 365 variables. Chaque élément du tableau contient une valeur. L'instruction suivante déclare la variable de tableau curExpense avec 365 éléments. Par défaut, un tableau étant indexé à partir de zéro, la limite supérieure de ce tableau est 364 et non 365.
Dim curExpense(364) As CurrencyPour définir la valeur d'un élément individuel, spécifiez l'index de l'élément. L'exemple suivant attribue une valeur initiale de 20 à chaque élément du tableau.
Sub FillArray() Dim curExpense(364) As Currency Dim intI As Integer For intI = 0 to 364 curExpense(intI) = 20 NextEnd SubModification de la limite inférieure
L'instruction Option Base placée au début d'un module permet de changer l'index par défaut du premier élément de 0 à 1. Dans l'exemple suivant, l'instruction Option Base change l'index du premier élément, et l'option Dim déclare la variable de tableau curExpense avec 365 éléments.
Option Base 1Dim curExpense(365) As CurrencyVous pouvez également définir explicitement la limite inférieure d'un tableau avec une clause To, comme le montre l'exemple suivant.
Dim curExpense(1 To 365) As CurrencyDim strWeekday(7 To 13) As StringStockage de valeurs de type Variant dans les tableaux
Vous pouvez créer des tableaux de valeurs de type Variant de deux manières. La première consiste à déclarer un tableau du type de données Variant, comme le montre l'exemple suivant :
Dim varData(3) As VariantvarData(0) = "Claudia Bendel"varData(1) = "4242 Maple Blvd"varData(2) = 38varData(3) = Format("06-09-1952", "Date, général")L'autre méthode consiste à affecter le tableau renvoyé par la fonction Array à une variable de type Variant, comme le montre l'exemple suivant.
Dim varData As VariantvarData = Array("Ron Bendel", "4242 Maple Blvd", 38, _Format("06-09-1952", "Date, général"))Les éléments d'un tableau de valeurs de type Variant sont identifiés par index, quelle que soit la technique de création du tableau employée. Par exemple, l'instruction suivante peut être ajoutée à n'importe lequel des exemples précédents.
MsgBox "Les données de " & varData(0) & " ont été enregistrées."Utilisation de tableaux multidimensionnels
Dans Visual Basic, vous pouvez déclarer des tableaux comportant jusqu'à 60 dimensions. Par exemple, l'instruction suivante déclare un tableau bidimensionnel 5 par 10.
Dim sngMulti(1 To 5, 1 To 10) As SingleSi vous comparez le tableau à une matrice, le premier argument représente les lignes, le second les colonnes.
Utilisez des instructions For...Next imbriquées pour traiter des tableaux multidimensionnels. La procédure suivante remplit un tableau bidimensionnel avec des valeurs de type Single.
Sub FillArrayMulti() Dim intI As Integer, intJ As Integer Dim sngMulti(1 To 5, 1 To 10) As Single ' Remplit le tableau de valeurs. For intI = 1 To 5 For intJ = 1 To 10 sngMulti(intI, intJ) = intI * intJ Debug.Print sngMulti(intI, intJ) Next intJ Next intIEnd Sub