Bonjour,
J'ai créé un formulaire en m'aidant du tuto RechercheMultiCritères.
J'ai 12 cases à cocher (1 par mois). Je voudrai afficher les enregistrements en fonction de(s) case(s) cochée(s). Il se peut que l'utilisateur ne coche que Janvier mais il peut aussi cocher Janvier + Février + Mars. Il doit pouvoir cocher tous les mois qu'il souhaite, sans forcément les cocher d'affilé (par exemple, Janvier + Mars + Juin). Bref, je me demande comment faire car avec 3 cases à cocher, ça me fait déjà beaucoup de combinaisons, alors avec 12... Y a t-il un moyen plus simple ?
Je vous mets le code que j'ai utilisé pour une autre variable, code que je pensais adapter pour mes 12 cases à cocher.
Merci pour votre aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 SQL = "SELECT IdExterne FROM MyTable Where IdExterne <> """" And year(date)=2011 " If Me.ChkType1.Value = -1 And Me.ChkType2.Value = -1 And Me.ChkType3.Value = -1 Then SQL = SQL & "And (Type=1001 or Type=1002 or Type=1003)" ElseIf Me.ChkType1.Value = -1 And Me.ChkType2.Value = -1 And Me.ChkType3.Value = 0 Then SQL = SQL & "And (Type=1001 or Type=1002)" ElseIf Me.ChkType1.Value = -1 And Me.ChkType2.Value = 0 And Me.ChkType3.Value = -1 Then SQL = SQL & "And (Type=1001 or Type=1003)" ElseIf Me.ChkType1.Value = 0 And Me.ChkType2.Value = -1 And Me.ChkType3.Value = -1 Then SQL = SQL & "And (Type=1002 or Type=1003)" ElseIf Me.ChkType1.Value = -1 And Me.ChkType2.Value = 0 And Me.ChkType3.Value = 0 Then SQL = SQL & "And Type=1001" ElseIf Me.ChkType1.Value = 0 And Me.ChkType2.Value = -1 And Me.ChkType3.Value = 0 Then SQL = SQL & "And Type=1002" ElseIf Me.ChkType1.Value = 0 And Me.ChkType2.Value = 0 And Me.ChkType3.Value = -1 Then SQL = SQL & "And Type=1003" ElseIf Me.ChkType1.Value = 0 And Me.ChkType2.Value = 0 And Me.ChkType3.Value = 0 Then SQL = SQL & "And Type!=1001 And Type!=1002 And Type!=1003" End If
Partager