XL 2016 Fonction RECHERCHEV où?

[ROI1482]

Bonjour à la communauté,
J'ai un fichier test avec une feuille base et une feuille extrait.
Je voudrai extraire:
la somme des valeurs jaunes de la colonne 3 pour les copier en B5 feuille EXTRAIT
la somme des valeurs grises de la colonne 4 pour les copier en B11 feuille EXTRAIT
la somme des valeurs vertes de la colonne 4 pour les copier en B13 feuille EXTRAIT
la somme des valeurs bleues de la colonne 4 pour les copier en B15 feuille EXTRAIT
la somme des valeurs roses la colonne 4 pour les copier en B17 feuille EXTRAIT
J'ai tenté d'utiliser RECHERCHEV mais doublons en colonne 1 qui n'est pas triée ne fonctionne pas.
Un petit coup de main me serait bien venu.
Cordialement

 

[JHA]

Bonjour à tous,

Tu peux créer des TCD

JHA

 

[ROI1482]

Bonjour à tous,

Tu peux créer des TCD

JHA

Merci pour cette solution qui fonctionne mais il me faut extraite 17 valeurs soit 17 TCD pour lesquels il faut définir une plage sachant la base varie en nombre de lignes suivant les mois.
Qu'en pensez vous ?

 

[OKBI]

Bonjour à tous,
un essai avec une fonction somme couleur trouvée sur le net
Cdt

 

[job75]

Bonsoir à tous,

trouvée sur le net

Pas terrible, je préfère ceci :

Function SommeCouleur(r As Range, ref As Range)
Application.Volatile
Dim coul&
coul = ref.Interior.Color
For Each r In r
    If IsNumeric(CStr(r)) Then If r.Interior.Color = coul Then SommeCouleur = SommeCouleur + CDbl(r)
Next
End Function

A+

 

[OKBI]

Bonsoir job75,
Ok merci