Bonjour à tous,
Je voudrais soliciter votre aide pour un problème lié à l'utilisation des bookmarks, sur lequel je m'acharne depuis quelques heures.
J'ai crée un formulaire access comportant des onglets. Dans chaque onglet il y a des sous-formulaires qui sont liés les uns avec les autres, le premier étant le sous-formulaire maître (les requêtes qui alimentent les autres ont comme critère une information affichée dans le premier.
J'ai utilisé la méthode "requery" sur l'évènement "changement d'onglet" pour actualiser les sous-formulaires. Le problème c'est que quand je reviens sur le 1er sous-formulaire il se remet systématiquement sur le premier enregistrement. Alors j'ai décidé d'utiliser les bookmarks (cf. code ci-dessous):
Or, je ne sais pas pourquoi j'ai systématiquement un message d'erreur "Signet invalide"
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
16
17 Private Sub onglets_Change() Dim rs As DAO.Recordset Dim bmk As Variant If Form_frmINTEGRE.onglets.Value = 1 Then Form_tbl_Engagements_sous_formulaire.Requery ElseIf Form_frmINTEGRE.onglets.Value = 2 Then Form_tbl_garanties_sous_formulaire.Requery ElseIf Form_frmINTEGRE.onglets.Value = 3 Then Form_qryAnalyses_sous_formulaire.Requery Else Set rs = Form_Sous_formulaire_client.RecordsetClone rs.FindFirst "id_client = " & Form_Sous_formulaire_client.id_client.Value bmk = rs.Bookmark Form_Sous_formulaire_client.Requery rs.Bookmark = bmk End If End Sub
Merci d'avance
Partager