Cumul d'une colonne en VBA

Bonsoir
j'ai un problème avec la colonne E je n'arrive pas à faire le cumul de la colonne D.

Code:

---

Cells(i, 5).Value = Cells(i, 4).Value + Cells(3, 4).Value

---

merci pour votre aide
bien cordialement
HERBIN

Bonjour,

Je ne comprend pas ce que tu veux faire.
Peux tu expliquer

a partir de la colonne D je siuhaite faire le cumul sur la colonne E
colonne D
45 454,55
45 454,55
41 322,31
40 980,81
31 046,07
et obtenir les résultats suivants sur la
colonne E
45 454,55
90 909,10
132 231,41
173 212,22
204 258,29
merci

Une simple formule devrai aller en E3

Code:

---

=Somme($D$2:$D3)

---

Voir aussi ici

Bonjour,

Code:

---

Cells(i, 5) = Cells(i, 5 - 1) + Cells(i + 1, 5- 1)

---

cordialement,

Didier

Citation:

---

Envoyé par Ormonth

Bonjour,

Code:

---

Cells(i, 5) = Cells(i, 5 - 1) + Cells(i + 1, 5- 1)

---

cordialement,

Didier

---

Bonjour,

Code:

---

Cells(i, 5) = Cells(i, 5 - 1) + Cells(i - 1, 5)

---

pour i >= 2 et Cells(1, 5) = Cells(1, 5 - 1)

plutôt, non ?

Cordialement,
n.

Bonjour,

De cette façon peut être ?

Code:

---

1 2 3 4 5 6

Cells(1, 5) = Cells(1, 5 - 1)   For i = 2 To 5 Cells(i, 5) = Cells(i - 1, 5) + Cells(i, 5 - 1) Next i

---

Hervé.

Bonjour,

Bien vu !
Euh, les 2 premiers sont faux / la demande... ainsi ?

Code:

---

1 2 3 4 5 6 7

Sub OK() Dim I   For I = 2 To 6 Cells(I, 5) = Cells(I - 1, 5) + Cells(I - 1, 5 - 1) Next I End Sub

---

qui retourne :

Code:

---

1 2 3 4 5 6 7 8

col D Col E 45 454,55 45 454,55 45454,55 41 322,31 90909,1 40 980,81 132231,41 31 046,07 173212,22 204258,29

---

Edit : oups , Theze, non rafraîchi... ;)

cordialement,

Didier

Salut.

Pour le fun et sans boucle

Code:

---

1 2	Range("e2:e5").Formula = "=sum($d$2:$d2)" Range("e2:e5").Value = Range("e2:e5").Value

---

La deuxième ligne pouvant être virée si on veut garder la dynamique.

Citation:

---

Pour le fun et sans boucle

---

Pas seulement, vu que dans ce cas, on écrit des formules dans la feuille qui réagiront en conséquence, il faudrait qu'Herbine précise sa finalité alors .... car effectivement il pourrait se passer de VBA sauf si toute sa construction est dynamique en VBA justement, à lui de jouer ;)

cordialement,

Didier

Citation:

---

Pour le fun...

---

Pas seulement, en effet.

L'avantage principal de passer la formule en VBA est que l'on sort la logique du code vba. On peut donc exploiter ce code pour toute situation où l'on doit boucler afin de placer des valeurs dans des cellules, puisqu'il suffit de créer la formule en Excel puis de la traduire en VBA et de la passer au code.

On évite dès lors les boucles, les blocs IF Endif, ...

Les seules "difficultés" étant alors de trouver la ligne d'arrêt et de la passer aux adresses de plage et à la formule.

De plus, on limite le code VBA au minimum (normal, on n'est pas des programmeurs mais des utilisateurs d'Excel) et on limite le risque de bugs (moins il y a de code, moins il y a de risques de bugs).

Petit plus intéressant: Sur de grandes plages, la vitesse d'exécution par rapport à une boucle n'est pas à négliger.