Bonjour,


Dans une zone de liste j'affiche x champs, je souhaite lorsque je "double-clic" sur une ligne ouvrir le formulaire correspondant à l'enregistrement mais je ne vois pas comment y reussir, faut il partir sur la meme base que ceci par exemple
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Liste366_AfterUpdate()
'Rechercher l 'enregistrement correspondant au contrôle.
Dim rs As Object
Dim monsql As String
monsql = "SELECT Contrats.num, Contrats.N°declient, Contrats.N°decontrat, Contrats.Typedecontrat, Contrats.[Activité-serviceCDG], Contrats.Montantducontrat FROM Contrats WHERE [N°declient]=Clients.N°declient"
Me.Liste456.RowSource = monsql
Set rs = Me.Recordset.Clone
If Me.opt_recherche = 1 Then
rs.FindFirst "[N°declient] = '" & Me![Liste366] & "'"
Else
rs.FindFirst "[nomduclient] = '" & Me![Liste366] & "'"
End If
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
End Sub
Sauf que là je navigue dans le meme formulaire, c'est avec un clic sur ma liste456 que je veux ouvrir le formulaire contrat.

Merci

Cyril