Bonsoir,
Sur un formulaire (frm1) j’ai deux sous formulaires (sfrm1) et (sfrm2)
En double cliquant sur un Enregistrement sous formulaire (sfrm2) , ce code me permet d’afficher sur le sous formulaire (sfrm1) l’enregistrement correspondant.
Comment donner alors une valeur égale à 1 à un champ vide (N°Groupe) de cet enregistrement.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Private Sub Form_DblClick(Cancel As Integer) '--- Rechercher l'enregistrement correspondant au contrôle. Dim rs As Object Set rs = Forms![frm Mise à jour frm1].Recordset rs.FindFirst "[NomAdhérent] = '" & [NomGroupe] & "'" If Not rs.EOF Then Forms![frm Mise à jour frm1].Bookmark = rs.Bookmark End Sub
Merci pour votre aide.
Salutations
Partager