vba variable dans boucle

Bonjour j'ai un petit probleme avec une variable.

j'ai fait un petit exemple pour expliquer :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub comptage()   fin = 4 solde2 = 4 solde3 = 6 solde4 = 1   For n = 2 To fin   rr = ("solde" & n)   MsgBox (rr) Next n   End Sub

---

ceci m'affiche 3 box successives dont le texte est "solde2" puis "solde3" puis "solde4".
hors moi je voudrais voir affiché le contenu de ces variables, c'est à dire "4"
"6" et "1".

je suis désolé car je sais que ça doit etre plutot simple mais je ne trouve pas de réponse sur le forum.

merci beaucoup!!

salut,
un exemple de solution en modifiant un peu ton approche a ete apporte ici :
http://www.developpez.net/forums/d96...ener-variable/

merci à toi pour ta réponse.
par contre je suis un peu perdu et je n'arrive pas à adapter cette discussion à mon probleme.

sans me macher le travail, peux tu me mettre sur la voie?

merci beaucoup

Bien sur,

au lieu d'utiliser n variables avec un libelle incremente, tu peux utiliser un tableau a n valeurs.


ton

Code:

---

1 2 3

solde2 = 4 solde3 = 6 solde4 = 1

---

devenant

Code:

---

1 2 3

solde(2) = 4 solde(3) = 6 solde(4) = 1

---

Je te laisse trouver la ligne de declaration et le code pour afficher les resultats ;)

ca y est j'ai trouvé :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Sub Test()   Dim solde(5) solde(1) = 4 solde(2) = 6 solde(3) = 1 Application.Run "Essai", solde   End Sub   Sub Essai(B)   For n = 1 To 3 MsgBox B(n) Next n   End Sub

---

encore plus simple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub comptage()   Dim solde(5) fin = 4   solde(2) = 4 solde(3) = 6 solde(4) = 1   For n = 2 To fin   MsgBox (solde(n))   Next n   End Sub

---

merci encore!