XL 2013 Donne les 3 valeurs les plus grande sur cellule de couleur

[Tager]

bonsoir à tous

Voici mon problème.
je recherche une formule ou une fonction pour extraire les 3 plus grande ou plus petite valeurs dans des colonne non contigu, telle que : e4; i4; m4; n4; r4; y4... ou dans des colonnes de couleur identique.


en espérant avoir été clair.

merci par avance

 

[Patrice33740]

Bonjour,

Excel n'est pas vraiment fait pour travailler sur des couleurs

Peut-être comme ça :

 

[JHA]

Bonjour à tous,

Un exemple pour éviter les couleurs

JHA

 

[Tager]

Fonctionne très bien.
Merci beaucoup

 

[job75]

Bonjour à tous,

Si l'on tient à faire le repérage par les couleurs on peut utiliser cette fonction VBA :

Function MatriceRecherche(recherche As Range)
Application.Volatile
If recherche(1) = "" Then End 'la fonction renvoie une valeur d'erreur
Dim P As Range, c As Range, coul&, a, col%, i%
With recherche(1)
  Set P = .Parent.Range("A1", .Parent.UsedRange)
  Set c = P.Find(.Cells, .Cells, xlValues, xlWhole)
  If c.Address = .Address Then End 'la fonction renvoie une valeur d'erreur
  coul = .Interior.Color
End With
Set P = Intersect(c.EntireRow, P)
a = P
col = c.Column
For i = 1 To UBound(a, 2)
  If i <= col Or P(1, i).Interior.Color <> coul Then a(1, i) = ""
Next
MatriceRecherche = a
End Function

La fonction est volatile donc :

- appuyer sur la touche F9 pour mettre à jour les résultats si l'on modifie les couleurs

- la macro Workbook_Open dans ThisWorkbook évite l'invite à la fermeture.

Fichier joint.

A+