Bonjour
En fait le but de ce code est d'afficher une liste d'objet d'une table selon des critères(ici le nom du livre, celui de l'auteur...) choisi grâce à des cases d'option, et selon une liste(LstRecherche).
Par exemple l'utilisateur cherche un bouquin par auteur, il coche le critère par auteur, puis il choisit ds la liste le nom de l'auteur.
Mais après j'ai un problème pr afficher la recherche.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub cmdRechercher_Click()
 
If chkChoix.Value = 1 Then
    DoCmd.RunSQL ("SELECT * FROM qryListebis WHERE ObjectNomAuteur = " & LstRecherche.Value)
    ElseIf chkChoix.Value = 2 Then
        DoCmd.RunSQL ("SELECT * FROM qryListebis WHERE ObjectNomLivre = " & LstRecherche.Value)
        ElseIf chkChoix.Value = 3 Then
            DoCmd.RunSQL ("SELECT * FROM qryListebis WHERE ObjectNomCollection = " & LstRecherche.Value)
End If
 
End Sub
Merci pr votre aide