Discussion :

[Youyou952]

Bonjour,

J'ai réalisé un formulaire sous access qui permet de filtrer successivement des données d'une table, 3 champs doivent être saisies l'un après l'autre pour affiner la recherche dans la table
Je souhaite qu'à chaque fin de saisie d'un champ texbox, celui-enclenche automatiquement un bouton que j'ai nommé "Appliquer filtre"

Merci pour votre aide.
Youyou

Ci-dessous mon code :

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
Private Sub Clic_Click()
 
 f = ""
 If Not IsNull(Me.Radress) And Me.Radress <> "" Then
     f = "Adresse_Magasin LIKE ""*" & Me.Radress & "*"""
 End If
 
 If Not IsNull(Me.RPN) And Me.RPN <> "" Then
     If f <> "" Then
         f = f & " AND Part_Number = """ & Me.RPN & """"
     Else
         f = "Part_Number = """ & Me.RPN & """"
     End If
 End If
 If Not IsNull(Me.RSN) And Me.RSN <> "" Then
     If f <> "" Then
         f = f & " AND Serial_Number LIKE ""*" & Me.RSN & "*"""
     Else
         f = "Serial_Number LIKE ""*" & Me.RSN & "*"""
     End If
 End If
 Me.Filter = f
 Me.FilterOn = True
 
End Sub

[loufab]

Bonjour,

Pour un déclenchement automatique utilises l'événement Après MAj de tes Textbox.

Cordialement,