Afficher la valeur la plus grande (en fonction d'une couleur)

Bonjour, je cherche la formule conditionnelle qui m permettra d'afficher la valeur la plus grande d'une colonne mais en choisissant seulement parmi une couleur en particulier (ex en fichier joint)

Merci d'avance pour toute aide apportée

Bonjour et bienvenue sur le forum

Un essai à tester. Te convient-il ?

Bye !

oh wow, c'est exactement ça, comment puis-je l'appliquer à plusieurs colonnes et eventuellement plusieurs couleurs?

Je ne sais pas comment voir/editer le code de ta fonction, c'est une macro?

ah, j'ai trouvé...

et en formule directe, sans passer par une macro, c'est possible?

Bonjour

ah, j'ai trouvé...

Moi aussi :

...et en formule directe, sans passer par une macro, c'est possible?

Je ne pense pas. En tout cas, pas par moi !

Bye !

Merci beaucoup :)

Bonjour kajahn, gmb , le forum,

...et en formule directe, sans passer par une macro, c'est possible?

Je ne pense pas. En tout cas, pas par moi !

Un essai via fonction personnalisée (à partir du code fourni par gmb )

Function maxCoul(c As Range, plage As Range)
  Dim couleur&, vMax!, cell As Range
          couleur = c.Interior.Color
         vMax = 0
          For Each cell In plage
            If cell.Interior.Color = couleur And cell.Value > vMax Then
                vMax = cell.Value
            End If
          Next cell
       maxCoul = IIf(vMax = 0, "", vMax)
End Function

Code à placer dans un module standard....

S'utilise comme une formule classique:

En B2:

=maxCoul(B2;$B$3:$B$23)

Cordialement,

Super, ça marche nickel :)

Merci grand !

Bonjour à tous,

Merci pour ton retour et ravi que cela réponde à ton besoin .

Merci à gmb d'avoir fourni le code

Bonne continuation,

Cordialement,

Bonjour à tous

@xorsankukai

Merci à gmb d'avoir fourni le code

Avect plaisir !

Bye !

Question subsidiaire :

si en plus de la valeur la plus grande en bleu par exemple on désire également afficher la moyenne de toutes les valeurs bleues?

(cf test-couleur-v3.xlsm ci dessus)

C'est de l'ordre du possible ou ça commencerait à devenir une usine à gaz la formule? ;)

Bonjour à tous,

afficher la moyenne de toutes les valeurs bleues?

Un essai....

Function MoyenneCoul(c As Range, plage As Range)
  Dim couleur&, somme, compteur, cell As Range

          couleur = c.Interior.Color
            somme = 0
         compteur = 0

          For Each cell In plage
            If cell.Interior.Color = couleur And cell.Value <> "" Then
                somme = somme + cell.Value: compteur = compteur + 1
            End If
          Next cell
       MoyenneCoul = IIf(somme = 0, "", somme / compteur)
End Function

Je ne prends en compte que les cellules non vides....

Cordialement,

ah

C'est purement génial !

Un grand merci !

C'est incroyable ce qu'on peut faire avec un peu de code !

Cordialement