Macro pour colorer des cellules sous certaines conditions

job75

XLDnaute Barbatruc

• 25 Août 2008

• #2

Re : Macro pour colorer des cellules sous certaines conditions

Bonjour,
Regardez bien, vos conditions se supperposent.
A+

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 25 Août 2008

• #3

Re : Macro pour colorer des cellules sous certaines conditions

Bonsoir


Essaie de voir du coté de Select Case

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 25 Août 2008

• #4

Re : Macro pour colorer des cellules sous certaines conditions

Bonsoir à tous

peut être comme ceci :

Code:

If Range("F16").Value < 0.93 Then
    Range("I16").Interior.ColorIndex = 3
        ElseIf Range("F16").Value < 0.95 Then Range("I16").Interior.ColorIndex = 45
        ElseIf Range("F16").Value < 0.97 Then Range("I16").Interior.ColorIndex = 6
    Else
        Range("I16").Interior.ColorIndex = 50
End If

bonne soirée
@+

 

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 25 Août 2008

• #5

Re : Macro pour colorer des cellules sous certaines conditions

Bonsoir Tortue, le forum,

Un début de piste avec une MFC.

JHA

 

Pièces jointes

• Tortue.xls

  21 KB · Affichages: 177
• Tortue.xls

  21 KB · Affichages: 180
• Tortue.xls

  21 KB · Affichages: 181

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 25 Août 2008

• #6

Re : Macro pour colorer des cellules sous certaines conditions

Bonsoir tout le monde,

une autre proposition avec "Switch":

Code:

With Range("F16")
  Range("I16").Interior.ColorIndex = Switch(.Value < 0.93, 3, .Value >= 0.93 And .Value < 0.95, 45, .Value >= 0.95 And .Value < 0.97, 6, .Value >= 0.97, 50)
End With

 

Vote positif 0 Vote négatif

T

tortue14

Guest

• 25 Août 2008

• #7

Re : Macro pour colorer des cellules sous certaines conditions

Merci à vous tous, je n'ai plus qu'à me remettre dessus et si j'ai un souci je me permettrai de vous écrire. Bonne soirée

 

Vote positif 0 Vote négatif