Discussion :

[frisou65]

Bonjour à tous,
je voudrais faire une somme qui est variable donc voici mon code:

Code :

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

1
2
3
 
    Range("AR13").Select
    ActiveCell.FormulaR1C1 = "=SUM( RC[-40]:RC[-" & i - 3 & "])"

Il s'agit une somme variable sur une ligne mais la complication c'est que je veux additionner une cellule sur 3 tout au long de la somme. Je sais pas comment le formuler.
Est ce que quelqu'un peut m'aider?
Merci d'avance.

[wilfried_42]

Bonjour

une simple formule suffit, par contre, les R1C1, je ne suis pas habitué à cette numeration lol

Code :

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

=Sommeprod((mod(ligne(A1:A200);3)=1)*1;A1:A200)

fait la somme dans la plage A1:A200 en sauttant 2 lignes donc

Additionne A1, A4, A7, A10........

[frisou65]

Je me suis servi de ta formule avec mon coté variable cela donne ça:

Code :

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

1
2
 
ActiveCell.FormulaR1C1 = "=SOMMEPROD((mod(ligne(D13:D & i-3 );3)=1)*1;D13:D & i-3)"

Par contre cela me donne une erreur 1004: erreur défine par l'application ou par l'objet.

[wilfried_42]

re:

c'est normal lol

si tu as un excel francais :

Code :

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

ActiveCell.FormulaLocal = "=SOMMEPROD((mod(ligne(D13:D" & i & "-3 );3)=1)*1;D13:D"  & i & " -3)"

edit apres relecture pour variable i