Bonjour, je suis actuellement en stage et je suis en train de continuer le projet d'une autre personne et je suis confronté au problème suivant, le code fait une recherche avec différents paramètres, et à un moment donné ce code va chercher le nom d'un établissement
code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Set ooo = mabd.OpenRecordset("Etablissement") Do Until ooo.EOF If (ooo!numero_etablissement = d!numero_entreprise) Then Me.resultat_recherche.RowSource = Me.resultat_recherche.RowSource & ";" & ooo!nom End If ooo.MoveNext Loop ooo.Close
Et je dois par la suite pouvoir (en double cliquant sur le résultat) afficher la fiche de l'entreprise, j'ai commencé à écrire la fonction DblClick que voici
code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub resultat_recherche_DblClick(Cancel As Integer) If (IsNull(Me.resultat_recherche) <> True) Then ouvrir_etablissement (Me.resultat_recherche) End If End Sub
Mais je ne vois pas comment récupérer ce résultat, pourriez-vous m'aider..
Merci
Partager