Calcul valeurs cellules colorées avec conditions

[Scoty]

Bonjour à tous,

Soit un tableau de planning utilisé dans une autre de mes discussions pour calculer le nbre de cellules colorés et en fonction de conditions (voir: https://www.excel-downloads.com/thr...-de-cellules-colorees-avec-conditions.224358/)

Pour le même tableau, je souhaiterai à présent calculer la somme des valeurs contenues dans les cellules colorées et en fonction de 2 conditions ("codes" et "réel"), ligne 17 et 19.

J'utilise une fonction SommeSiCouleur trouvé sur le net mais elle ne fonctionne pas avec un SommeProd.

1 - Comment la transformer pour l'utiliser avec le SommeProd?

2 - Peut on ultiliser le SommeSiCouleur avec plusieurs couleurs ? Ex: "=SommeSiSouleur(A:A;36&4&18&.....)??

Un grand merci, dans l'attente de vous lire. Bon début de semaine a tous

@+Scoty

 

[Scoty]

Re : Calcul valeurs cellules colorées avec conditions

Re,

Je pense avoir trouvé une solution. J'utilise finalement le code :

Function couleur10(Pcoul As Range) As Variant()
Application.Volatile
Dim Mat(), L&, C&
ReDim Mat(1 To Pcoul.Rows.Count, 1 To Pcoul.Columns.Count)
For L = 1 To UBound(Mat, 1): For C = 1 To UBound(Mat, 2)
    Mat(L, C) = Pcoul(L, C).Interior.ColorIndex
    Next C, L
 couleur10 = Mat
End Function

Et je rajoute un argument à la fin de formule:

=SOMMEPROD(($B$6:$B$13=$B17)*($C$6:$C$13=$C17)*(couleur10(D$6:D$13)<>-4142)*(D$6:D$13))

Pour le SommeSiCouleur avec plusieurs couleurs, je planche encore....

@+Scoty