XL 2019 additionner des cellules en fonction

[Goo69]

Bonjour,

Je cherche une formule pour additionner des cellules d'un tableau qui dépend d'un point de départ horizontal fixe (janvier en colonne B), d'un point qui évolue dans le temps (= la variable horizontale : février en colonne C, mars en colonne D) et un critère vertical.
Exemple en pj avec une formule test qui ne fonctionne pas.
Comment s'y prendre ?

Merci !

 

[sousou]

Bonjour
une fonction perso pour le fun
Function additionne(x, y)
With ActiveSheet
Set tableau = .Range("a1:m5")
lg = tableau.Columns(1).Rows.Find(x).Row
col = tableau.Rows(1).Rows.Find(y).Column
For n = 2 To col
valeur = .Cells(lg, n) + valeur
Next
End With
additionne = valeur
End Function

 

[JHA]

Bonjour à tous,

Ajout MFC pour colorer la plage de recherche.

=SOMME(DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);;;MOIS(1&$C$8)))

Formule MFC

=EQUIV(B2;DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);;;MOIS(1&$C$8));0)

JHA

 

[Goo69]

Bonjour,
avec cette formule?

=SOMME(DECALER($A$1;EQUIV($B$8;A:A;0)-1;1;;MOIS("1/"&$C$8)))

@Jeannette Merci c'est exactement ça. Je découvre donc la somme dynamique. Il faut maintenant que je m'entraine à utiliser cette imbrication de fonctions hyper utile !!!

 

[Goo69]

Bonjour
une fonction perso pour le fun
Function additionne(x, y)
With ActiveSheet
Set tableau = .Range("a1:m5")
lg = tableau.Columns(1).Rows.Find(x).Row
col = tableau.Rows(1).Rows.Find(y).Column
For n = 2 To col
valeur = .Cells(lg, n) + valeur
Next
End With
additionne = valeur
End Function

Merci @sousou , ça pourra certainement servir. Pour l'instant je reste hors VBA.

 

[Goo69]

Bonjour à tous,

Ajout MFC pour colorer la plage de recherche.

=SOMME(DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);;;MOIS(1&$C$8)))

Formule MFC

=EQUIV(B2;DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);;;MOIS(1&$C$8));0)

JHA

Merci @JHA, cet ajout sera très utile pour une version de présentation !

 

[Goo69]

Bonjour à tous,

Ajout MFC pour colorer la plage de recherche.

=SOMME(DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);;;MOIS(1&$C$8)))

Formule MFC

=EQUIV(B2;DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);;;MOIS(1&$C$8));0)

JHA

@JHA, j'ai un soucis au niveau de l'addition.
Si je modifie le mois de départ (de janvier on passe à juillet), alors l'addition des cellules n'est plus cohérente.
Je ne connais pas assez la fonction DECALLER() pour trouver une solution...

 

[JHA]

Bonjour à tous,

Avec un choix du début et de fin.
MFC modifiée

=SOMME(DECALER($B$1;EQUIV($B$8;$A$2:$A$5;0);EQUIV($C$8;$B$1:$M$1;0)-1;;EQUIV($D$8;$B$1:$M$1;0)-(EQUIV(C8;$B$1:$M$1;0)-1)))

JHA