XL 2010 Changer de couleur de texte dans une zone de texte

guy72

XLDnaute Impliqué
Bonjour,
Dans l'image si dessous, j'ai une zone de texte qui avec une macro change de couleur.
VB:
Case Is < 91: R = 250: G = 90: B = 90
Case Is < 101: R = 255: G = 70: B = 50
Case Is > 100: R = 255: G = 55: B = 0
.

Mais, je souhaiterais changer la couleur du texte, qu'il soit en blanc à partir de 60 km/h
Que dois-je faire ?
Vent.png
 

guy72

XLDnaute Impliqué
Bonjour,
Ça fonctionne mais comme ça
Merci

VB:
'Couleur du texte
Shapes("Texte Rafale").Fill.ForeColor.RGB = RGB(R, G, B)
Select Case Target.Value
        Case Is < 60: R = 0: G = 0: B = 0
        Case Is > 60: R = 255: G = 255: B = 255
        End Select
        DrawingObjects("Texte Rafale").Font.Color = RGB(R, G, B)
 

Discussions similaires

Réponses
0
Affichages
188

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 668
Messages
2 090 739
Membres
104 643
dernier inscrit
adriano22