Discussion :

[Beaver]

Bonjour à tous,

J'ai un formulaire dont la source est une table. Ce formulaire permet de travailler en édition dans ma table. Pour faciliter la navigation de l'utilisateur, ce formulaire contient un sous-formulaire qui est en fait une version listée des enregistrements de ce formulaire. Je souhaiterais qu'en double cliquant sur une ligne de mon sous-formulaire, j'arrive à l'enregistrement correspondant dans mon formulaire pour pouvoir le modifier de façon conviviale.

Je dois donc appliquer une macro à l'ensemble des champs de mon sous-formulaire (pour le double-clic sur la ligne), mais je ne vois pas laquelle utiliser. TrouverEnregistrement me paraissait pas mal, mais on ne peut pas l'assortir d'une condition where. Par ailleurs, je pense que la macro tentera de trouver dans mon sous-formulaire. Or, c'est bien dans le formulaire qu'elle doit chercher.

Lorsque j'ouvre mon sous-formulaire seul (sans mon formulaire), je parviens à ce que je souhaite en utilisant la macro OuvrirFormulaire et en plaçant ma condition where. Malheureusement, ça ne fonctionne pas lorsque je travaille dans mon formulaire (avec le sous-formulaire dedans).

Merci d'avance pour votre réflexion.

[madefemere]

Bonsoir,

Je ne crois pas que ça soit possible avec une macro.
En VBA, il faudrait créer une procédure dans ton sous-formulaire avec le code

Code :

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

1
2
3
4
5
6
Private Sub TrouverIdEnr()
    With Me.Parent
            .RecordsetClone.FindFirst "[Id] =" & Me.ID
            .Bookmark = .RecordsetClone.Bookmark
    End With
End Sub

Et appeler ce code sur les évènements Double-click des contrôles de ton sous-formulaire

Code :

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

1
2
3
Private Sub ID_DblClick(Cancel As Integer)
call TrouverIdEnr
End Sub

Cordialement,

[Beaver]

Bonjour madefemere,

Désolé pour ma réponse un peu tardive. Je viens seulement d'avoir l'occasion de tester votre solution.

Elle répond à mon besoin. Un grand merci !

Bien à vous,