Problème de Recherche

Bonjour,

Voici mon problème :

J'ai un formulaire evec 3 champs

Numero qui s'appelle Numero dans mon formulaire
Nom qui s'appelle RechMonnaie dans mon formulaire
Valeur qui s'appelle Valeur_monnaie dans mon formulaire

J'ai une liste déroulante qui pointe vers mon champ Nom et à partir de
cette
liste, quand je clique sur tel ou tel nom j'aimerais que la valeur dans le
champ Valeur se mette à jour automatiquement.

J'ai fais cela mais marche pas :

Private Sub RechMonnaie_AfterUpdate()

Me.Filter = "Numero =" & Me!RechMonnaie
Me.FilterOn = True

End Sub


Quelqu'un a-t-il une idée ?

Merci d'avance.

Guillaume

Bonjour,

Essais d'adapter ce code. L'événement que tu utilises est le bon Ce code
permet d'atteindre un client dans un formulaire.

Private Sub cboCustomer_AfterUpdate()
Dim daoRS As DAO.Recordset

Set daoRS = Me.RecordsetClone
daoRS.FindFirst "[aCode] = '" & cboCustomer & "'"
If Not daoRS.EOF Then Me.Bookmark = daoRS.Bookmark
cboCustomer = ""
End Sub

--
Patrick

"Guillaume" <g.marande@mulliez.fr> wrote in message
news:eraj5AP6EHA.3756@TK2MSFTNGP14.phx.gbl...

Bonjour,

Voici mon problème :

J'ai un formulaire evec 3 champs

Numero qui s'appelle Numero dans mon formulaire
Nom qui s'appelle RechMonnaie dans mon formulaire
Valeur qui s'appelle Valeur_monnaie dans mon formulaire

J'ai une liste déroulante qui pointe vers mon champ Nom et à partir de
cette
liste, quand je clique sur tel ou tel nom j'aimerais que la valeur dans
le

champ Valeur se mette à jour automatiquement.

J'ai fais cela mais marche pas :

Private Sub RechMonnaie_AfterUpdate()

Me.Filter = "Numero =" & Me!RechMonnaie
Me.FilterOn = True

End Sub


Quelqu'un a-t-il une idée ?

Merci d'avance.

Guillaume