Je bloque sur une formule Excel. j’ai un fichier Excel avec 3 pages. Sur la feuille 1 et feuille 2 il y a un tableau avec des cellules colorées.
Sur la feuille 3 c’est un recap des 2 autres tableaux et c’est dans ce tableau que j’aimerai qu’Excel me donne la somme de toutes les cellules de la même couleur.
J’ai essayé de faire la formule "[somme.si] comme expliqué dans la vidéo de Docteur Excel mais il ne me trouve pas le bon résultat ou il me dit trop de caractère. Quelqu’un aurait une solution pour moi? J’ai essayé plein de choses mais je bloque vraiment.
J’étais avec mon telephone au moment de la réponse pouvais pas faire mieux, j’ai fait une capture d’écran pour essayer de vous donner une idée de mon tableau et donc mieux comprendre mon explication car pas simple d’expliquer comme ça .
Voici le fichier
Ok, mais nous ne pouvions pas réellement faire quelque chose sans le fichier sauf à le reproduire.
Voici une proposition dans le fichier joint:
La macro est dans le Module1 du fichier enregistré au format .xlsm
Function NBCOULEURS(plage As Range, cc As Range) As Integer
Dim clr(), n%, i%, c As Range
Application.Volatile
ReDim clr(cc.Cells.Count - 1): i = -1
For Each c In cc.Cells
i = i + 1: clr(i) = c.Interior.Color
Next c
For Each c In plage
For i = 0 To UBound(clr)
If c.Interior.Color = clr(i) Then
n = n + 1: Exit For
End If
Next i
Next c
NBCOULEURS = n
End Function
Merci pour ta réponse mdo100. Mais j’ai l’impression que ça me calcule le nombre de cellules de couleur et pas la somme du contenu des cellules. Tu aurais une façon de faire? Cordialement
