Bonjour,

J'ai créé un formulaire pour réaliser un inventaire de pièces. Pour minimiser les résultats lors d'une recherche d'une pièce. Je voudrais créer un programme qui permettrais de rentrer des champs et après validation que le formulaire m'affiche les résultat.
j'ai créé ce programme

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
f = ""
If Not IsNull(Me.Rnom) And Me.Rnom <> "" Then
f = "Nom_produit LIKE ""*" & Me.Rnom & "*"""
End If
If Not IsNull(Me.RRef_autom) And Me.RRef_autom <> "" Then
If f <> "" Then
f = f & " AND autom = """ & Me.RRef_autom & """"
Else
f = "automr = """ & Me.RRef_autom & """"
End If
End If
If Not IsNull(Me.RRef_n°) And Me.RRef_n° <> "" Then
If f <> "" Then
f = f & " AND numero LIKE ""*" & Me.RRef_n° & "*"""
Else
f = "numero LIKE ""*" & Me.RRef_n° & "*"""
End If
End If
Me.Filter = f
Me.FilterOn = True

---------------------------------------------

Le soucis c'est lorsque j'insère des noms pour effectuer ma recherche lorsque je valide un message d'erreur s'affiche
"Erreur 438 propriété ou méthode non gérée par cet objet "
L'erreur se produit sur cette ligne.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
If Not IsNull(Me.Rnom) And Me.Rnom <> "" Then
....je ne trouve pas l'erreur est ce que quelqu'un peut m'aider???

merci d'avance