Comparer valeur d'un userform
coudu
-
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
pijaku Messages postés 13513 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,j'ai créé un userform dans lequel j'ai:
un Textbox1, dans lequel je mets une valeur.
et un Textbox2 dans lequel j'ai deja une valeur( par exemple 4)
J'aimerai que lorsque la valeur du textbox2 est inférieure a celle de la textbox1 alors la textbox 2 ce colorie en rouge.
Merci
un Textbox1, dans lequel je mets une valeur.
et un Textbox2 dans lequel j'ai deja une valeur( par exemple 4)
J'aimerai que lorsque la valeur du textbox2 est inférieure a celle de la textbox1 alors la textbox 2 ce colorie en rouge.
Merci
Configuration: Windows 2000 Internet Explorer 6.0
1 réponse
-
Bonjour,
La réponse de Farfadet hier ne fonctionne pas? :
https://forums.commentcamarche.net/forum/affich-15552852-couleur-de-fond-textbox
If TextBox.Value < 5 Then
TextBox.BackColor = RGB(255, 0, 0)
Else TextBox.BackColor = RGB(255, 255, 255)
A adapter à ton problème d'aujourd'hui...
Adaptation :
Dans VBA, double clic sur ton TextBox2 tu obtiens :
Private Sub TextBox2_Change()
End Sub
Entre ces deux ligne place ce code :
Dim i As Integer, j As Integer
i = TextBox1.Value
j = TextBox2.Value
If j < i Then
TextBox2.BackColor = RGB(255, 0, 0)
Else
TextBox2.BackColor = RGB(255, 255, 255)
End If
Et voilà
