couleur font selon valeur

[flamel]

Bonjour à tous.

Voici uin petit morceau de code :

Selection.Font.Color = RGB(255, 0, 0)
If x 9 Then Cells(xLin, xCol + 11) = x

qui ne marche pas. Je n'obtiens pas le changement de couleur. Je ne trouve pas pourquoi.

Merci pour toute aide.

 

[flamel]

Le message a été tronqué.
Je viens de le reposter.

 

[Law]

Bonsoir Flamel, Jmps,

Petite suggestion : au lieu d'en passer par une macro, tu peux aussi utiliser la mise en forme conditionnelle d'Excel (menu 'Format', 'Mise en forme conditionnelle...').

Sinon, pour en revenir à ta macro, l'architecture de celle-ci devrait plutôt être :

Si... (condition)
Alors... (conséquence)
(et non pas l'inverse).

Exemple :
If c.Value = 'Toto' then
c.Font.ColorIndex = 3

Ciao ciao !!