Discussion :

[letal]

Bonjour,

J'ai un soucis avec un tableau dynamique:

Code :

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

1
2
3
4
5
6
7
8
If matchName = False Then  'une erreur est détecté, alors il entre ici pour stocker le nom qui pause problème
 
   c = c + 1
   ReDim tableNomOrphelin(1 To c, 1 To 2)
 
   tableNomOrphelin(c, 1) = tableNom(a) 'il passe le nom 
   tableNomOrphelin(c, 2) = WS1.Cells(i, X2).Address 'et son adresse
End If

En deux mots, si la condition est remplie, il entre dans le IF, il prends le nom de la tableNom et le passe dans la tableNomOrphelin etc...
C'est c'est OK avec une seul entrée, la première.
S'il doit revenir dans cette partie du code, il va y avoir un problème de redimensionnement, j'ai une erreur 9, problème de dimension (hors dimension).

Qu'en pensez-vous???

[mercatog]

Tu as une boucle et tu ne peux redimensionner que la 2ème dimension

Code :

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

1
2
3
4
5
6
If matchName = False Then  'une erreur est détecté, alors il entre ici pour stocker le nom qui pause problème
   c = c + 1
   ReDim Preserve tableNomOrphelin(1 To 2, 1 To c)
   tableNomOrphelin(1, c) = tableNom(a) 'il passe le nom
   tableNomOrphelin(2, c) = WS1.Cells(i, X2).Address 'et son adresse
End If

[letal]

Bonjour mercatog,

Ok, j'ai fait comme tu as fais et ça fonctionne, génial.

En revanche, ce que je ne comprends pas, c'est que si tu fais une table dans le sens horizontale, comme dans ton cas, cela fonctionne, X colonne pour 2 rangée mais, si tu le fais en horizontale, 2 colonnes pour x rangée, il plante !!!

Le truc drôle, c'est que si tu ne mets pas "Preserve" comme dans mon premier cas cela fonctionne. Sauf que les données sont effacées à chaque passage...

Une dernière question???
Quel est la commande pour récupérer le nombre d'info dans un table

[gFZT82]

Bonjour,

Je crains que tu n’aies pas bien saisi ce que t’a indiqué mercatog.
Avec ReDim Preserve tu ne peux pas modifier la taille de la première dimension de ton tableau.
Seule la dernière dimension du tableau peut être modifiée.

http://silkyroad.developpez.com/vba/tableaux/

Cordialement.

[issoram]

Bonjour,

Tu te sers d'un tableau dont (seule) la deuxième dimension est dynamique. Puis avec:

Code :

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

Application.Transpose

tu retombes sur ce que tu veux

[letal]

oups, vous avez répondu plus vite que moi ;-)

Oui, j'ai compris mais un peu tard

Donc, pour conclure, seul la dernière dimension d'une table peut être dynamique, je crois que c'est clair maintenant.

Et je vais essayer le "transpose" juste pour le fun

Merci à vous