Discussion :

[emilie-cedatra]

Bonjour, voilà j'ai créer un formulaire avec les champs nom, adresse, cp, ville. à côté de ces champs, j'ai créer une zone de liste qui reprend le champ nom. je souhaite que lorsque je clique sur un des noms de cette zone de liste, les champs se mettent sur l'enregistrement sélectionné. les champs et cette zone sont dans la même page du formulaire (en détail). merci

[Jean-Philippe André]

bonjour emilie et bienvenue sur DVP

tu dois pouvoir passer dans l'évènement "après modification" et mettre à jour la requête de ton formulaire

[emilie-cedatra]

est que je ne sais pas trop quoi mettre comme code ...

[Jean-Philippe André]

hum,
peux tu nous indiquer la requête que tu utilises pour ton formulaire ?

[FreeAccess]

Bonjour,

je souhaite que lorsque je clique sur un des noms de cette zone de liste, les champs se mettent sur l'enregistrement sélectionné

Tu peux faire cela très facilement à l'aide de l'assistant....

Sur ton formulaire, tu pose un contrôle "Zone de liste déroulante"......dans la fenêtre de l'assistant qui s'ouvre, tu choisie la troisième option "Rechercher un enregistrement dans mon formulaire basé sur la valeur que j'ai sélectionnée dans la liste déroulante".........et tu n'as plus qu'a suivre les instructions de l'assistant jusqu'au bout....

Et voilà, c'est tout simple.....

[emilie-cedatra]

je ne veux pas utiliser une zone de liste déroulante mais une zone de liste.

[FreeAccess]

Bonjour,

Et bien ou est le problème.....
Tu applique ce que je t'ai dit concernant une Zone de liste déroulante à l'aide de l'assistant.......puis, toujours en mode conception, tu fait un clic droit sur ton contrôle ZdL > Remplacer par > Zone de liste....

Maintenant, si tu veux comprendre le code qui s'exécute lors de l'action dans ta zone de liste, il suffit de regarder le code sur l'événement "Après MAJ" de ta ZdL......tu y trouveras un code du genre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    ' Rechercher l'enregistrement correspondant au contrôle.
    Dim rs As Object
 
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[nom] = '" & Me![Modifiable6] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark

Bonne continuation..

[emilie-cedatra]

j'ai suivi ce que tu m'as dit en faisant une liste déroulante puis remplacer par une zone de liste. je ne savais pas que cela était possible. Merci, cela fonctionne !! je vais aller dans le code pour le comprendre.
emilie