[VBA/Excel] Redim. tableau à 2 dimensions

Résolu/Fermé
sfritz Messages postés 41 Date d'inscription jeudi 9 octobre 2008 Statut Membre Dernière intervention 1 janvier 2014 - 5 nov. 2008 à 10:49
pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 - 5 nov. 2008 à 14:39
Bonjour,
je suis actuellement sous VBA/Excel, ou j'ai crée un tableau (Bins) à 2 dimension variable.

Dim Bins() as String
Puis:
Redim Bins(0,0)...
Jusqu'à ci dessous.

J'ai pour le moment :

Bins:_- (0)_ - (0)
_________ -(1)

ce qui est, pour le moment, l'équivalent d'un tableau à une dimension, sous la forme d'un tableau à 2 dimensions.

J'aimerai rajouter une seconde dimension, en gardant les valeurs de l'ancien tableau, comme ci dessous:

Bins:_-(0)_ -(0)
_________-(1)
____-(1)_ -(0)

Je fais donc:
ReDim Preserve Bins(BinNumber)

Avec BinNumber = 1

Mais j'ai l'erreur suivante:

Erreur d'exécution '9':

L'indice n'appartient pas à la séléction.

Je ne sais pas à quoi est du cette erreur, j'ai l'impression qu'au lieu de redimensionner, le logiciel cherche Bins(1) dans le tableau, mais comme c'est inexistant, ça plante.

Pouvez m'aider?

Merci

2 réponses

lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
5 nov. 2008 à 14:29
Bonjour,
Tu ne peu pas changer le nombre de dimentions d'un tableau en préservant les données.
A+
3
pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 643
5 nov. 2008 à 14:39
Bonjour,


D'aprés la doc d'Excel :

"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. "

donc dans ton cas, seul ReDim Preserve Bins(0,BinNumber) est valide

Cdlt
3