bonsoir,
voici le code que j'ai récupére sur le forum, j'essaye de l'appliquer a mon application mais il ya un erreur.
statut= combobox
Private Sub statut_Change()
If Val(statut.Text) = "accepté" Then
statut.BackColor = vbGreen
If Val(statut.Text) = "en traitement" Then
statut.BackColor = vbYellow
Else
statut.BackColor = vbRed
End If
End Sub
merci de votre soutien et votre disponibilité
bonne soirée
voici le code que j'ai récupére sur le forum, j'essaye de l'appliquer a mon application mais il ya un erreur.
statut= combobox
Private Sub statut_Change()
If Val(statut.Text) = "accepté" Then
statut.BackColor = vbGreen
If Val(statut.Text) = "en traitement" Then
statut.BackColor = vbYellow
Else
statut.BackColor = vbRed
End If
End Sub
merci de votre soutien et votre disponibilité
bonne soirée