OVH Cloud OVH Cloud

Additionner des cellules

1 réponse
Avatar
Christine
Bonjour à vous tous.

Voici mon problème.

Dans la cellule C6 je veux additionner les cellules C1:C5. Comme écrire le
code ? La fonciton : ActiveCell.FormulaR1C1 = "=SUM(R[-5]C:R[-1]C)" ne
fonctionne pas car par la suite je fais descendre le cellule active à un
autre endroit (ici en C16) et faire l'addition. Donc ActiveCell.FormulaR1C1
= "=SUM(R[-5]C:R[-1]C)" ne pas compatible avec mes besoins.

3000 0,0270 81
3600 0,0270 97
3600 0,0270 97
4800 0,0270 130
5400 0,0270 146
551

1000 0,0333 33
50 0,0563 3
700 0,0563 39
1400 0,0563 79
3150 0,0563 177
3150 0,0563 177
3500 0,0563 197
10514 0,0563 592
1298

Quelqu'un peut m'aider ? :)))

Merci.

1 réponse

Avatar
michdenis
Bonsoir Christine,


Application.EnableEvents = False
Range("C6").Formula = "=Sum(C1:C5)"
Application.EnableEvents = True


La seconde partie du problème "je fais descendre le cellule active ...) je n'ai pas vraiment compris le mystère !!!


Salutations!



"Christine" a écrit dans le message de news:otp2d.4924$
Bonjour à vous tous.

Voici mon problème.

Dans la cellule C6 je veux additionner les cellules C1:C5. Comme écrire le
code ? La fonciton : ActiveCell.FormulaR1C1 = "=SUM(R[-5]C:R[-1]C)" ne
fonctionne pas car par la suite je fais descendre le cellule active à un
autre endroit (ici en C16) et faire l'addition. Donc ActiveCell.FormulaR1C1
= "=SUM(R[-5]C:R[-1]C)" ne pas compatible avec mes besoins.

3000 0,0270 81
3600 0,0270 97
3600 0,0270 97
4800 0,0270 130
5400 0,0270 146
551

1000 0,0333 33
50 0,0563 3
700 0,0563 39
1400 0,0563 79
3150 0,0563 177
3150 0,0563 177
3500 0,0563 197
10514 0,0563 592
1298

Quelqu'un peut m'aider ? :)))

Merci.