recherche via une liste déroulante sur un autre formulaire

'sur un event du formulaire de recherche (ex double clic sur résultat)

Dim RS As Object

DoCmd.OpenForm "FRM_PRODUITS"

Set RS = Forms![FRM_PRODUITS].Recordset.Clone

RS.FindFirst "[n°CAS] = '" & Me.ZDL_Result_GEP & "'" 'pas de quotes si valeur numérique

Forms![FRM_PRODUITS].Bookmark = RS.Bookmark

Set RS = Nothing