changer de couleur la valeur

Y

Yo

Guest

• 21 Juin 2003

• #2

Essaye ça :

Private Sub TextBox1_AfterUpdate()
If TextBox1.Value < 0 Then TextBox1.ForeColor = RGB(0, 255, 0)
If TextBox1.Value > 0 Then TextBox1.ForeColor = RGB(255, 0, 0)
End Sub

 

Vote positif 0 Vote négatif

P

petchy

Guest

• 21 Juin 2003

• #3

Salut YO
merci d'avoir répondu
j'ai essayer ton code mais sa ne fonctionne pas.

petchy

 

Vote positif 0 Vote négatif

Y

Yo

Guest

• 21 Juin 2003

• #4

Peux-tu poster dans le forum ton classeur excel

 

Vote positif 0 Vote négatif

P

petchy

Guest

• 21 Juin 2003

• #5

trop volumineux

 

Vote positif 0 Vote négatif

M

Moa

Guest

• 21 Juin 2003

• #6

Salut Petchy !

Tu as une solution pour remédier à ça :

C'est de lier ton textbox à une cellule, puis de mettre un format conditionnel dans ta cellule, puis de placer ton textbox sur la cellule liée, et de mettre la propriété "BackStyle" de ton textbox, sur "fmbackStyleTransparent.

Ceci dit cela fonctionne très bien si tu vass dans ton textbox avec les flêches du clavier, mais cela ne fonctionne pas si tu changes la valeur de ton textbox après un clic de souris.


@ +

Moa

 

Pièces jointes

• Textbox.zip

  6.7 KB · Affichages: 18
• Textbox.zip

  6.7 KB · Affichages: 22
• Textbox.zip

  6.7 KB · Affichages: 20

Vote positif 0 Vote négatif

M

Moa

Guest

• 21 Juin 2003

• #7

Salut re-Moa...héhé..!

Je viens de tester la macro de Yo et elle fonctionne très bien.

Voir fichier joint.

@ +

Moa

 

Pièces jointes

• Textbox1.zip

  9.5 KB · Affichages: 21
• Textbox1.zip

  9.5 KB · Affichages: 21
• Textbox1.zip

  9.5 KB · Affichages: 24

Vote positif 0 Vote négatif

P

petchy

Guest

• 21 Juin 2003

• #8

merci Moa

mais mon textbox est dans un USF.

petchy

 

Vote positif 0 Vote négatif

P

petchy

Guest

• 21 Juin 2003

• #9

MERCI à vous

sa fonctionne bien,j'ai du faire une connerie quelque part.

@ plus
petchy

 

Vote positif 0 Vote négatif