Auto réponse ;
Etape 1 : Dans votre feuille de calcul, faites le raccourci ALT + F11 pour accéder à l'éditeur visual Basic
Etape 2 : Cliquez sur "Insertion" et "Module"
Etape 3 : Saisissez le code de la fonction suivante dans la nouvelle fenêtre
Function SOMME_SI_COULEUR(PlageSomme As Range, PlageCouleur As Range) As Variant
'*********************************************************
' Effectuer la somme des cellules en couleur *
'*********************************************************
Dim Cel As Range
Dim Som As Double
If PlageCouleur.Cells.Count > 1 Then
SOMME_SI_COULEUR = CVErr(xlErrValue)
Exit Function
End If
For Each Cel In PlageSomme
If Cel.Interior.ColorIndex = PlageCouleur.Interior.ColorIndex Then Som = Som + Cel
Next
SOMME_SI_COULEUR = Som
End Function
Etape 4 : Retournez dans votre feuille de calcul et appliquez un fond de couleur au choix sur les cellules à additionner
Dans la cellule devant accueillir le résultat, saisissez la formule suivante :
=SOMME_SI_COULEUR(Plage des cellules comportant les nombres;Cellule comportant le fond de couleur à prendre en compte)
Voila les syntaxes des formules de la capture
