Bonjour,
J'ai créé une zone de liste déroulante indépendant qui me permet de filtrer mon formulaire dont voici le contenu :
Voici l'évènement sur AfterUpdate :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 SELECT rqt_home.FAMILLE FROM rqt_home GROUP BY rqt_home.FAMILLE ORDER BY rqt_home.FAMILLE;
Avec cette manière, le formulaire ne filtre que sur 1 famille. or je voudrais pouvoir faire un filtre en sélectionnant + d'1 famille.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Sub Famille_filtre_AfterUpdate() f = "" If Not IsNull(Me.Famille_filtre) And Me.Famille_filtre <> "" Then If f <> "" Then f = f & " AND FAMILLE = """ & Me.Famille_filtre & """" Else f = "FAMILLE = """ & Me.Famille_filtre & """" End If End If Me.Filter = f Me.FilterOn = True End Sub
J'ai donc pensé aux cases à cocher dans ma zone de liste déroulante.
Pourriez-vous m'indiquer comment m'y prendre svp ?
Merci
Partager