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.
Private Sub Form_DblClick(Cancel As Integer)
'--- Rechercher l'enregistrement correspondant au contr=F4le.
Dim rs As Object
Set rs =3D Forms![frm Mise =E0 jour frm1].Recordset
rs.FindFirst "[NomAdh=E9rent] =3D '" & [NomGroupe] & "'"
If Not rs.EOF Then Forms![frm Mise =E0 jour des frm1].Bookmark =3D
rs.Bookmark
End Sub
Comment donner alors une valeur =E9gale =E0 1 =E0 un champ vide
(N=B0Groupe) de cet enregistrement.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ze Titi
Bonjour Jacques
As-tu essayé d'affecter une valeur par défaut au champ [N° groupe] ?
Dans ton message du lundi
Bonjour,
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.
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 des frm1].Bookmark > rs.Bookmark
End Sub
Comment donner alors une valeur égale à 1 à un champ vide (N°Groupe) de cet enregistrement.
Merci pour votre aide.
Salutations
-- Voilou ! Bon courage ! Cordialement, ze Titi
Bonjour Jacques
As-tu essayé d'affecter une valeur par défaut au champ [N° groupe] ?
Dans ton message
<1169455329.110595.147840@s34g2000cwa.googlegroups.com> du lundi
Bonjour,
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.
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 des frm1].Bookmark > rs.Bookmark
End Sub
Comment donner alors une valeur égale à 1 à un champ vide
(N°Groupe) de cet enregistrement.
As-tu essayé d'affecter une valeur par défaut au champ [N° groupe] ?
Dans ton message du lundi
Bonjour,
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.
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 des frm1].Bookmark > rs.Bookmark
End Sub
Comment donner alors une valeur égale à 1 à un champ vide (N°Groupe) de cet enregistrement.
