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

  • Initiateur de la discussion Initiateur de la discussion Tager
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Tager

XLDnaute Nouveau
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
 

Pièces jointes

Bonjour à tous,

Si l'on tient à faire le repérage par les couleurs on peut utiliser cette fonction VBA :
Code:
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+
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
6
Affichages
965
Réponses
3
Affichages
615
Retour