OVH Cloud OVH Cloud

Dates pour filtrer limitter Etats Pb

8 réponses
Avatar
Jacky
Salut à tous,
Petit bug, j'ai quasiment tout essayé, impossible de filtrer mon état pour
limitter les années d'affichage de comparaison de facturation mensuelle.
Case 3
Me.Filter = "[Date envoi]=Between Year(Date) And Year(Date)-1"
Case 4
Me.Filter = "[Date envoi]=Between Year(Date) And Year(Date)-3" &
Tampon
Case 5
Me.Filter = "[Date envoi]=Entre Année(Date) Et Année(Date)-5"
Case 6
Me.Filter = "[Date envoi]=Between Year(Date) And Year(Date)-10"

End Select

DoCmd.OpenReport stDocName, acViewPreview, Me.Filter
'Me.Filter = True
DoCmd.Close acForm, "Dialogue états ventes"
------------- Autre Méthode utilisée idem
stLinkCriteria = "[Date envoi] Between #1/ 1/2006# AND #31/12/2006#
DoCmd.OpenReport stDocName, acViewPreview, , stLinkCriteria

Si quelqu'un connait la solution avec Date....
Encore merci à tous pour votre soutient.
A+

8 réponses

Avatar
Eric
Bonjour,

En premier lieu :
Dans tous les Case (3-6), supprimes le signe = avant le between
Dans le Case 4, à quoi correspond le & Tampon ?
Dans le Case 5, remplaces Année par Year et Entre par Between.

L'argument conditionWhere de la commande OpenReport/Form est une
restriction correspondant à la clause Where de SQL et celle-ci doit être
écrite en US

Essaies:
pour la méthode 1 :
Me.Filter correspond à l'argument conditionWhere et non à l'argument
NomFiltre. Donc :
DoCmd.OpenReport stDocName, acViewPreview, , Me.Filter

ou pour la méthode 2 : dates au format US (mm/dd/yyyy)
stLinkCriteria = "[Date envoi] Between #1/1/2006# AND #12/31/2006#
DoCmd.OpenReport stDocName, acViewPreview, ,stLinkCriteria


Salut à tous,
Petit bug, j'ai quasiment tout essayé, impossible de filtrer mon état pour
limitter les années d'affichage de comparaison de facturation mensuelle.
Case 3
Me.Filter = "[Date envoi]¾tween Year(Date) And Year(Date)-1"
Case 4
Me.Filter = "[Date envoi]¾tween Year(Date) And Year(Date)-3" &
Tampon
Case 5
Me.Filter = "[Date envoi]=Entre Année(Date) Et Année(Date)-5"
Case 6
Me.Filter = "[Date envoi]¾tween Year(Date) And Year(Date)-10"

End Select

DoCmd.OpenReport stDocName, acViewPreview, Me.Filter
'Me.Filter = True
DoCmd.Close acForm, "Dialogue états ventes"
------------- Autre Méthode utilisée idem
stLinkCriteria = "[Date envoi] Between #1/ 1/2006# AND #31/12/2006#
DoCmd.OpenReport stDocName, acViewPreview, , stLinkCriteria

Si quelqu'un connait la solution avec Date....
Encore merci à tous pour votre soutient.
A+



--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Jacky
"Jacky"
Salut eric
Merci pour l’info, le filtre s’affiche normalement dans les propriété de
l’état à ouvrir.
Souçis, aucune donnée ne sort, message à la place des [Date envoi]="#Erreur"
Dans select Case j'ai mis:
Me.Filter = "[Date envoi]Between Year(Date()) And Year(Date())-5"
Dans Etat
([Date envoi]Between Year(Date()) And Year(Date())-5)



Bonjour,

En premier lieu :
Dans tous les Case (3-6), supprimes le signe = avant le between
Dans le Case 4, à quoi correspond le & Tampon ?
Dans le Case 5, remplaces Année par Year et Entre par Between.

L'argument conditionWhere de la commande OpenReport/Form est une
restriction correspondant à la clause Where de SQL et celle-ci doit être
écrite en US

Essaies:
pour la méthode 1 :
Me.Filter correspond à l'argument conditionWhere et non à l'argument
NomFiltre. Donc :
DoCmd.OpenReport stDocName, acViewPreview, , Me.Filter


Avatar
Eric
re,

J'avais pas vu qu'il manqait la fonction Year sur la date d'envoi.
Me.Filter = "Year([Date envoi]) Between Year(Date()) And Year(Date())-5"
fait l'affaire, non ?

"Jacky"
Salut eric
Merci pour l’info, le filtre s’affiche normalement dans les propriété de
l’état à ouvrir.
Souçis, aucune donnée ne sort, message à la place des [Date envoi]="#Erreur"
Dans select Case j'ai mis:
Me.Filter = "[Date envoi]Between Year(Date()) And Year(Date())-5"
Dans Etat
([Date envoi]Between Year(Date()) And Year(Date())-5)





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Jacky
Voila le filtre utilisé
Me.Filter = "Year([Date envoi])Between Year(Date()) And Year(Date())-3"
Ca fonctionne du tonnerre. Selection multi CASE opérationnel.
Super, super, super
Encore merçi à toi.
Jacky

re,

J'avais pas vu qu'il manqait la fonction Year sur la date d'envoi.
Me.Filter = "Year([Date envoi]) Between Year(Date()) And Year(Date())-5"
fait l'affaire, non ?

"Jacky"
Salut eric
Merci pour l’info, le filtre s’affiche normalement dans les propriété de
l’état à ouvrir.
Souçis, aucune donnée ne sort, message à la place des [Date envoi]="#Erreur"
Dans select Case j'ai mis:
Me.Filter = "[Date envoi]Between Year(Date()) And Year(Date())-5"
Dans Etat
([Date envoi]Between Year(Date()) And Year(Date())-5)





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr




Avatar
Jacky
Salut eric,
Encore un petit problème pour l’année c’est bon
Par contre dans mon état lorsque je veux afficher tous les enregistrements
du mois en cours, il m’affiche le bon mois mais toutes les années.
Me.Filter = "Month([Date envoi])=Month(Date())"
Avatar
Eric
Bonsoir,

Me.Filter = "Month([Date envoi])=Month(Date()) and Year([date envoi]) =
Year(date())" devrait faire l'affaire.

Salut eric,
Encore un petit problème pour l’année c’est bon
Par contre dans mon état lorsque je veux afficher tous les enregistrements
du mois en cours, il m’affiche le bon mois mais toutes les années.
Me.Filter = "Month([Date envoi])=Month(Date())"


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Eric
.../...
ou plus simpe:
Me.Filter = "Format([Date envoi],'yymm')= format(date(),'yymm')"

Bonsoir,

Me.Filter = "Month([Date envoi])=Month(Date()) and Year([date envoi]) =
Year(date())" devrait faire l'affaire.


Salut eric,
Encore un petit problème pour l’année c’est bon
Par contre dans mon état lorsque je veux afficher tous les
enregistrements du mois en cours, il m’affiche le bon mois mais toutes
les années.
Me.Filter = "Month([Date envoi])=Month(Date())"





--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr


Avatar
Jacky
Bonsoir,
Non, il y a quelque chose qui ne lui plait pas. La syntaxe a l'air correct
pourtant.
Les autres filtres à partir de Date fonctionne.
Me.Filter = "Month([Date envoi])=Month(Date()) And Year([Date envoi])
=Year(date())"
Bizarre......