Zone de liste déroulante

Bonjour,

"Emilie"

Voilà j'ai un champs qui est une zone de liste déroulante à l'interieur de
duquel j'ai 3 possibilités ; est il possible d'avoir une couleur de fond en
fonction de l'option choisie dans cette zone ?
Ex : dans cetter zone j'ai 3 pssibilités : Payé , En attente de Paiement et
Piement Administratif.
J'aimerais qu'en fonction de l'option choisie, mon champs soit, par exemple,
Vert pour Payé, Jaune pour En attente de paiement etc.......

Dans l'événement, "Sur après mise à jour" de la liste, tu mets qque chose comme:


Private Sub MaListe_AfterUpdate()
With Me!MaListe
Select Case MaListe.Value
Case "Payé"
.BackColor = vbGreen
Case "En attente de paiement"
.BackColor = vbYellow
Case "Paiement adm..."
.BackColor = vbRed
End Select
End With
End Sub


Et "Sur activation du formulaire, tu mets

Private Sub Form_Current()
Call MaListe_AfterUpdate
End Sub


PS: Tu adapte le nom de ta liste...

--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------

In news:%23oqGfKSAEHA.3456@TK2MSFTNGP09.phx.gbl, 3stone
<threestone@cielreseau.be> me disait :

Bonjour,

Bonjour Pierre ( 3Stone )

Dans l'événement, "Sur après mise à jour" de la liste, tu mets qque
chose comme:


Private Sub MaListe_AfterUpdate()
With Me!MaListe
Select Case MaListe.Value
Case "Payé"
.BackColor = vbGreen
Case "En attente de paiement"
.BackColor = vbYellow
Case "Paiement adm..."
.BackColor = vbRed
End Select
End With
End Sub


Et "Sur activation du formulaire, tu mets

Private Sub Form_Current()
Call MaListe_AfterUpdate
End Sub


PS: Tu adapte le nom de ta liste...

Un grand merci pour cette aide réellement précieuse.

Bon après-midi

Merci encore
A+

Emilie