Calcul dans la même colonne Résolu/Fermé

Question

Bonjour, 
BONJOUR LE FORUM
Demande  aide je travaille en xls toutes les cellules ne sont pas remplies
Il faudrait dans A2 
La somme de la cellule en dessous de la cellule de  tous les  mots CLE  dans la colonne A
Il faudrait dans B2
 La somme de la cellule en dessous de la cellule de  tous les  mots CC dans la colonne B
Ainsi de suite dans la ligne 2 jusqu'à la colonne H .
Et quand je transmet le dossier les personnes puissent 
modifier les chiffres en dessous des références que le total se réalise toujours en ligne 2 
Cela fonctionne avec les chiffres en couleur mais complexe avec les feuilles
 qui circule entre membres du club 
Des colonnes supplémentaires pourraient être ajoutées
Merci à l'avance
Model dans ci-joint   https://www.cjoint.com/c/EAkiLAoYpKU


micheleliane
>

micheleliane · Answer

BONSOIR au FORUM

J'ai fini par trouver la formule qui calcul la somme de la cellule en dessous du mot 
de référence sur toute la colonne .
Je ne peux pas l'expliquer mais cela fonctionne.
SI quelqu'un peux donner les explications je suis preneur

=SOMMEPROD(--(A1:A2000="CLE");A2:A2001)

MERCI et BONNE SOIREE

micheleliane

micheleliane · Answer

BONSOIR AU FORUM
Je mets la formule en VBA car j'ai eu des difficultées pour l'exécuter  

Sub SOMMEdansLIGNE2()
'Somme de la cellule qui se trouve en dessous de la référence dans la colonne
    Range("A2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""CLE""),R[2]C:R[1999]C)"
    Range("B2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""CC""),R[2]C:R[1999]C)"
    Range("C2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""CE""),R[2]C:R[1999]C)"
    Range("D2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""CDIS""),R[2]C:R[1999]C)"
    Range("E2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""VE""),R[2]C:R[1999]C)"
    Range("F2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""PP""),R[2]C:R[1999]C)"
    Range("G2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""PV""),R[2]C:R[1999]C)"
    Range("H2").FormulaR1C1 = _
        "=SUMPRODUCT(--(R[1]C:R[1998]C=""GRBC""),R[2]C:R[1999]C)"
    Range("A1").Select
End Sub

micheleliane

Calcul dans la même colonne

2 réponses

Discussions similaires