MFC pour grande et petite valeur

[apt]

Bonsoir,

J'aimerais avoir une MFC pour trouver la plus grande et la plus petite valeur pour chaque ligne de mon tableau.

Une MFC pour colorier deux lignes par intermittence est déjà appliquée

Merci.

 

[Gorfael]

Re : MFC pour grande et petite valeur

Bonsoir,

J'aimerais avoir une MFC pour trouver la plus grande et la plus petite valeur pour chaque ligne de mon tableau.

Une MFC pour colorier deux lignes par intermittence est déjà appliquée

Merci.

Salut
Voir pièce jointe
A+

 

[Tibo]

Re : MFC pour grande et petite valeur

Bonsoir apt,

Le souci c'est qu'on est limité à 3 conditions pour une MFC.

Pour en gagner une, j'ai choisi d'appliquer une couleur de base.

Pour déterminer la plus petite et la plus grande valeur, j'ai appliqué la MFC sur la police (Rouge Gras).

Je te laisse regarder le fichier.

Reviens si ce que j'ai fait ne correspond pas à ton attente et dans ce cas, avec plus d'explications.

@+

Edit : salut Gorfael, beau travail.

@+

 

[apt]

Re : MFC pour grande et petite valeur

Bonsoir Gorfael, Tibo et tous le forum,

Merci pour vos deux.

Je crois que je vais prendre l'exemple de Gorfael car il est plus simple.

Ca marche trés bien sauf que j'aimerais bien que seul la MFC de coloriage de ligne qui s'applique depuis la colonne A.

Pour la recherche des valeurs, ça devrait être appliqué depuis la colonne B.

Est-ce possible ?

Merci.

 

[Banzai64]

Re : MFC pour grande et petite valeur

Bonjour

Pour enlever ls MFC de la colonne A

Tu selectionnes la colonne A du tableau
Menu : Format --> Mise en forme conditionnelle
et dans la fenetre tu fais 'supprimer...' et tu choisis (coches) les deux premiers choix

ok
ok

 

[apt]

Re : MFC pour grande et petite valeur

Ok et merci beaucoup Banzai64.

 

[apt]

Re : MFC pour grande et petite valeur

Je m’excuse d’être dans l’obligeance de vous demander encore un fois de m’aider dans ce cas de MFC.

Toujours en recherchant la plus grandes et la plus petite valeur dans une ligne, mais cette fois-ci j'aimerais l'appliqué colonne par colonne.

Ex :

Dans les colonnes B, D, F ainsi de suite il y'a les même données

Et dans les colonnes C, E, G il y'a d'autres données similaires.

Est-il possible d'espérer avoir une solution à ce problème ?

Merci.

 

[apt]

Re : MFC pour grande et petite valeur

Bon j'ai essayé avec cette formule, masi ça n'a pas marché :

=B$6=OU((MOD(COLONNE();2)=0)*(MIN(B$6:G$6));(MOD(COLONNE();2)<>0)*(MIN(B$6:G$6)))

 

[Banzai64]

Re : MFC pour grande et petite valeur

Bonjour

Essayes

 

[apt]

Re : MFC pour grande et petite valeur

Bonjour Banzai64,

Voila ce que j'aimerais avoir, en fichier joint :

 

[Banzai64]

Re : MFC pour grande et petite valeur

Bonjour
Assez compliqué comme souhait

 

[apt]

Re : MFC pour grande et petite valeur

Je vois que du rouge Banzai64.

Pas évident de s'y retrouver ...

Je crois qu'il faut avoir recours au VBA.

Encore merci.

 

[apt]

Re : MFC pour grande et petite valeur

Re,

Bon, j'ai developpé ce code depuis la source de Daniel.C :

Mais ca n'a pas marché ...

'---------------------------------------------------------------------------------------------------------------
Sub MAX_MIN_Color()
    Dim Plage As Range, PlageImpaire As Range, PlagePaire As Range

    Dim c As Range
    For Each c In [B4:G20]
        Set Plage = Range("B" & c.Row, "G" & c.Row)
        Set PlageImpaire = Range("B" & c.Row)
        Set PlagePaire = Range("B" & c.Row)
       
        For i = 2 To Plage.Columns.Count
            If i / 2 = CInt(i / 2) Then
                Set PlagePaire = Union(PlagePaire, Cells(c.Row, i))
            Else
                Set PlageImpaire = Union(PlageImpaire, Cells(c.Row, i))

            End If
        Next
        
        'PlagePaire.Select
        'PlagePaire.Cells.Interior.ColorIndex = 4
        'PlageImpaire.Select
        'PlageImpaire.Cells.Interior.ColorIndex = 43

        PMin = Application.WorksheetFunction.Min(PlagePaire)
        PMax = Application.WorksheetFunction.Max(PlagePaire)

    
        IPMin = Application.WorksheetFunction.Min(PlageImpaire)
        IPMax = Application.WorksheetFunction.Max(PlageImpaire)
   
        '-------------------------
        With PlagePaire
            L1 = .Find(PMin, LookIn:=xlValues, Lookat:=xlWhole).Row
            C1 = .Find(PMin, LookIn:=xlValues, Lookat:=xlWhole).Column
            L2 = .Find(PMax, LookIn:=xlValues, Lookat:=xlWhole).Row
            C2 = .Find(PMax, LookIn:=xlValues, Lookat:=xlWhole).Column
        End With

        Cells(L1, C1).Interior.ColorIndex = 12
        Cells(L2, C2).Interior.ColorIndex = 19

        '-----------------

        With PlageImpaire
            iL1 = .Find(PMin, LookIn:=xlValues, Lookat:=xlWhole).Row
            iC1 = .Find(PMin, LookIn:=xlValues, Lookat:=xlWhole).Column
            iL2 = .Find(PMax, LookIn:=xlValues, Lookat:=xlWhole).Row
            iC2 = .Find(PMax, LookIn:=xlValues, Lookat:=xlWhole).Column
        End With

        Cells(iL1, iC1).Interior.ColorIndex = 12
        Cells(iL2, iC2).Interior.ColorIndex = 19
        

    Next

End Sub

'---------------------------------------------------------------------------------------------------------------

Quelqu'un peut-il avoir une meilleure idée ?

Merci d'avance.

 

[apt]

Re : MFC pour grande et petite valeur

Toujours pas de solution ?

 

[jeanpierre]

Re : MFC pour grande et petite valeur

Bonsoir le fil,

Apt, tu as déjà des solutions, mais le problème, c'est que tu as déjà, aussi, une mise en forme, qui s'accomplie à chaque ligne, donc les suivantes ne seront plus considérées puisque la première s'impose....

Peux-tu repréciser stp... Sans VBA, ici, je ne vois pas, mais il est vrai aussi que je n'ai pas vraiment suivi le fil.

Bonne soirrée

Jean-Pierre