récupérer des données

Bonjour,

Dans une macro j'ai une boucle en While qui me récupère un montant.
Or je dois encore récupéré d'autre montant, pour cela je fais un do While.
Mais comment dois-je faire pour ne pas perdre le 1er montant?

Pouvez vous m'aider svp?
Merci d'avance

Bonjour

Avec le code ce serait mieux.

Philippe

Le code n'est pas tout a fait fini encore.
J'aimerais juste savoir comment garder le montant de la première boucle.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29

deb = 0 fin = 0 i = 1   Do     While deb = 0 Or fin = 0   If (Sheets("Suivi").Cells(i, 8).Interior.Color = 16711422) Then If deb = 0 Then deb = i + 1 Else fin = i - 1 End If   End If i = i + 1 Wend     For j = deb To fin mtt = mtt + Cells(i, 10) Next deb = 0 fin = 0     While Sheets("Suivi").Cells(i, 8).Interior.Color <> macouleur

---

Bonjour,

Tu pourrais peut être utiliser un tableau dynamique pour mémoriser tes montants à chaque sortie de ta boucle.

Cordialement.

Et utiliser la fonction tab?
Comment faut-il faire, je ne connais pas cette fonction?

Tu crées un tableau de Single de taille variable et un integer pour ton indice que tu initialise à 0.
Lorsque tu sort de ta boucle For, tu insert ton montant dans ton tableau et tu incrémente ton indice.

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

Voila ça devrait te permettre de conserver tes valeurs dans un tableau.

Merci bien!