Discussion :

[yedid]

Bonjour !

Voila, je vous explique :

J'ai une table 2D que j'aimerai remplire au fur et a mesure (remplissage dans une boucle)
A chaque tour de la boucle, je fais donc un Redim pour ajouter une "ligne" de plus a mon tableau 2D. Le probleme, c'est que je ne peux pas faire de Redim Preserve dans ce cas la pour conserver mes anciennes valeurs :

Code en simplifié :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Dim Table as Variant
 
Redim table(0 to 0, 0 to 1)
For i = 0 to 10 
Redim Preserve table(0 to i,0 to 1)
table(i,0) = i
table(i,1) = i * 2
Next i

Le Redim Preserve me met une erreur : "indice n'appartenant pas a la selection"

Alors que sans le Preserve ca marche mais ca efface tout ce qu'il y avait avant!!

Quelqu'un a t il une solution??

Merci

[pc75]

Bonjour,

Un extrait de MSDN :

Si vous utilisez le mot clé Preserve, vous ne pouvez redimensionner que la dernière dimension du tableau. Vous ne pouvez en aucun cas modifier le nombre de dimensions. Par exemple, si votre tableau n'a qu'une dimension, vous pouvez la modifier puisqu'il s'agit de la dernière et seule dimension. Toutefois, si le tableau compte plusieurs dimensions, seule la taille de la dernière dimension est modifiable si vous souhaitez préserver le contenu du tableau. L'exemple suivant montre comment augmenter la taille de la dernière dimension d'un tableau dynamique sans effacer les données qu'il contient :

ReDim X(10, 10, 10)
. . .
ReDim Preserve X(10, 10, 15)

De même, le mot clé Preserve ne permet de redimensionner un tableau qu'en modifiant la limite supérieure ; toute modification de la limite inférieure provoque une erreur.