Au secours, je flanche : je veux lancer un formulaire depuis une requete VBA.
j'ai une liste déroulante qui me renvoi un ID et je fais ma requête en prennant cet ID en critère. ça marche en requete SQL, mais pas en vba. Voici le code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub Modifiable325_AfterUpdate()
    stDocName = "Contact_Org"
    SQLdep = " SELECT DISTINCT RequeteTOTALE.T_Contact.ID_Contact "
    SQLdep = SQLdep & "FROM RequeteTOTALE.T_Contact LEFT JOIN RequeteLIEN ON "
    SQLdep = SQLdep & "RequeteTOTALE.T_Contact.ID_Contact = RequeteLIEN.T_Contact.ID_Contact "
    SQLdep = SQLdep & "WHERE RequeteLIEN.L_Lien.ID_Lien = "
    MonSQL = SQLdep & Me.Modifiable325 & " ORDER BY RequeteTOTALE.T_Contact.ID_Contact ; "
    DoCmd.OpenForm stDocName, acNormal, , MonSQL
End Sub
j'ai même réduit la requête au minimum pour faire un test et toujours rien. avez-vous une idée. Merci