bonjour à tous,
voilà j'ai essaye depuis quelque jours de faire une formulaire multicritère, par nom, et type Aptitude (liste déroulante) le problème que je choisi un nom ou une aptitude ça ne change rien du tout je croix que j'ai un problème avec le code quelqu'un peut m'aider pour identifier le problème svp:
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
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40 Option Compare Database Option Explicit Private Sub BtTout_Click() Dim ctl As Control For Each ctl In Me.Controls If Left(ctl.Name, 6) = "filtre" Then Me(ctl.Name) = Null End If Next ctl Me.Requery End Sub Private Sub filtreNom_AfterUpdate() Me.Requery End Sub Private Sub filtreNom_Click() End Sub Private Sub filtreNom_DblClick(Cancel As Integer) RaZ End Sub Private Sub filtreTypeAptitude_AfterUpdate() Me.Requery End Sub Private Sub filtreTypeAptitude_Click() End Sub Private Sub filtreTypeAptitude_DblClick(Cancel As Integer) RaZ End Sub Private Sub RaZ() Me.ActiveControl = Null Me.Requery End Sub
Partager