Discussion :

[MelaAllIn]

Bonjour,

De nouveau, j'ai besoin de l'aide du forum !..
Je souhaite créer un formulaire de recherche, qui sera composé d'une zone de texte pour taper le mot que l'on souhaite trouver, et d'un sous-formulaire, dans lequel apparaitrait toutes les lignes qui contiennent ce mot.

Pour être un peu plus précise, voilà un exemple :
- J'ai la table Parents, qui contient le champs Type.
- Dans cette table, j'ai plusieurs enregistrements (papa1, papa2, Papa3, maman1, maman2).
- Lorsque je tape papa dans la zone de texte de recherche du formulaire, je voudrais ne voir apparaitre dans mon sous-formulaire que les lignes qui contiennent papa (donc papa1, papa2 et papa3).

J'arrive à filtre sur la totalité du champs à l'aide d'une liste déroulante (donc de ne faire apparaitre que papa1, par exemple), mais rien à faire pour aller un peu plus loin en filtrant sur une partie du champs...

Si quelqu'un peut m'aider, ça serait sympa !

MelaAllIn

[Oliv'83]

Salut,

Voici le code que j'utilise sur l'évènement Après MAJ :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim strFiltre As String
 
On Error Resume Next
strFiltre = ""
'Filtre sur le nom
If Not IsNull(Me.txtNomClient) Then
    strFiltre = "([Nom_du_Client] like '*" & Me.txtNomClient & "*')"
End If
 
'Filtrer le sous-formulaire
With Me.sfrm_Recherche_Client.Form
    .Filter = strFiltre
    .FilterOn = True
End With

A toi de l'adapter à ton cas.

Oliv'

[MelaAllIn]

Merci Oliv'83 pour ta réponse.
J'ai pu adapter ton code, et ça marche !