Discussion :

[possible924]

Bonjour à tous,
je tente de faire un filtre en VBA

Code :

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

1
2
3
4
5
6
Me.Filter = "UPP_Date =" & DateEnCours * 1
ça marche !
 
    Me.Filter = "Usager_Recherche like " & "'*" & Me!RechercheUsager & "*'" marche aussi,
 
    Me.Filter = "UPP_Date =" & DateEnCours * 1 And "Usager_Recherche like" & "'*" & Me!RechercheUsager & "*'"

ça ne marche plus !!!

pouvez vous m'aider ?
merci par avance

[possible924]

Bonjour à tous,
je m'étais très mal exprimé et je recommence.
Je souhaite filtrer un formulaire par du code.
J'ai écrit ceci :

Code :

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

1
2
Me.Filter = "[UPP_Date] =" & (DateEnCours * 1) And "[Usager_Recherche] like '*" & Me!RechercheUsager & "*'"
    Me.FilterOn = True

ça ne marche pas !
Je reçois le message d'erreur 13 "incompatibilité de type"
j'ai décomposé le filtre et fait un essai avec chaque critère

Code :

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

1
2
   Me.Filter = "UPP_Date =" & DateEnCours * 1
    Me.Filter = "Usager_Recherche like '*" & Me!RechercheUsager & "*'"

chacun de ses filtres marche bien.

que faut'il faire pour que le filtre fonctionne avec les deux critères
Merci

[FreeAccess]

Bonjour,

A essayer...

"(UPP_Dat)=" & (DateEnCours * 1) & " AND (Usager_Recherche) Like '*' "