Discussion :

[frabeau]

Bonjour,

J'essaie de filtrer un formulaire à l'aide d'un champs indépendant [OFF] devant filtrer la liste des enregistrement suivant le champs [NUM_WO] (champs à valeur numérique).
Je pense que j'ai un problème de guillemets ou autres.
Merci de votre aide.

Code :

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

1
2
3
4
5
6
7
8
Private Sub Commande40_Click()
f = "[QTY]>0"
If Not IsNull(Me.OFF) And Me.OFF <> "" Then
f = f & " AND NUM_WO = '" & Me.OFF & "'"
End If
Me.Filter = f
Me.FilterOn = True
End Sub

[Gado2600]

Bonjour,
Petite suggestion pouvant t'aider de nombreuses fois :
Affiches ta variable f (que tu dois déclarer d'ailleurs) dans un msgbox ou autre.
Tu verras ce qu'il contient et peut être ton erreur.

Affiches le nous aussi par la même occasion.

Crdl

[frabeau]

Je ne comprend pas ta question concernant l'affichage de la variable f.
J'ai adapté ce bout de code trouvé dans le forum.
Je suis assez novice en matière de VBA.
Si tu pêux être plus "concret" pour moi.

Merci

[Gado2600]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Commande40_Click()
Dim f as String ' Définition de ta variable
f = "[QTY]>0"
If Not IsNull(Me.OFF) And Me.OFF <> "" Then
f = f & " AND NUM_WO = '" & Me.OFF & "'"
End If
 
' Affiche la valeur de f dans un message box
msgbox f
 
Me.Filter = f
Me.FilterOn = True
End Sub

Tu mets ce code là et tu verras ce que contient ton filtre.
Ensuite, si ton Me.OFF est de même type que NUM_WO alors tu as plusieurs cas :
- Type texte :

Code :

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

NUM_WO='" & me.OFF & "'"

- Type numeric :

Code :

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

NUM_WO=" &me.OFF

- Type date :

Code :

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

NUM_WO=#" & format(me.OFF, "mm/dd/yyyy") & "#"

Enfin, ton formulaire est-il en continu ou non ? (tu peux le voir dans les propriétés du formulaire).
Peux-tu afficher ton formulaire pour que l'on ai plus de détails, en fait. Car il y a de nombreuses possibilités qui peuvent engendrer l'erreur, si tu débutes sous Access.

[frabeau]

Mon formulaire est en mode continu.
Je met en fichier joint une image de mon formulaire en mode création.
Le champs [OFF] est le menu déroulant.
Message msgbox : [QTY]>0 AND NUM_WO='60351'

[Gado2600]

Ok.
Vu la forme du formulaire, je suppose que c'est un formulaire continue.
De plus, si la données filtrée est 60351, je suppose également que c'est déclaré dans tes tables en type numérique.
Donc, tu n'as pas besoin de tes apostrophes.

[frabeau]

C'est TOP, merci et bonne fin de journée.