Access vba filtre date Etat [Résolu/Fermé]

Signaler
Messages postés
122
Date d'inscription
lundi 18 juin 2007
Statut
Membre
Dernière intervention
9 mars 2018
-
Messages postés
9755
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
10 octobre 2020
-
Bonjour,

j'ai besoin de filter un etat en fonction d'une date mais cela ne fonctionne pas.
j'ai définie une variable, DateJour égale a la date du jour.
je dois filtrer en fonction de la date du jour, et de la semaine en cours.

ci dessous des exemples de filtres qui ne fonctionnent pas pour les dates.
Les valeurs numériques autres fonctionnent.

j'ai également essayé de mettre =#08/08/2008# mais les# ne fonctionnent pas non plus.

Connaissez vous le moyen et la synthaxe pour faire des filtres sur dates ?
Merci à vous. La quète continue...

************************Extrait de code ***********************
Dim stDocName As String

stDocName = "Liste_Alerte"
DoCmd.OpenReport stDocName, acPreview

Reports![Liste_Alerte].Filter = "[NumTC]=" & ListeTC
'Fonctionne


' Reports![Liste_Alerte].Filter = "[DateAlerte]=" & "08/08/2008"
' ne fonctionne pas.

' Reports![Liste_Alerte].Filter = "[DateAlerte]=" & #08/08/2008#
' ne fonctionne pas.

' Reports![Liste_Alerte].Filter = "[DateAlerte]=" & DateJour
' ne fonctionne pas.


Reports![Liste_Alerte].FilterOn = True
************************Extrait de code ***********************

8 réponses

Messages postés
122
Date d'inscription
lundi 18 juin 2007
Statut
Membre
Dernière intervention
9 mars 2018
7
ok, requete inutile.


si joint la solution pour un double filtre, un avec un numérique et un avec une date.

Reports![Liste_Alerte].Filter = "[NumTC]=" & ListeTC & "And [DateAlerte]= #" & Month(DateJour) & "/" & Day(DateJour) & "/" & Year(DateJour) & "#"
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 60511 internautes nous ont dit merci ce mois-ci

Messages postés
9755
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
10 octobre 2020
1 078
Bonjour,
Juste au passage, vous devez filtrer vos données avec une requête qui est la propriété source de votre état.
Messages postés
122
Date d'inscription
lundi 18 juin 2007
Statut
Membre
Dernière intervention
9 mars 2018
7
je vais essayer de passer par une requète pour filtrer et je vous tiens au courant.

Merci.
Messages postés
9755
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
10 octobre 2020
1 078
Bonjour,
Merci pour cette autre possibilité, en lieu et place de la requête qui fonctionne aussi très bien comme ci dessous:
La requête en SQL :
SELECT T_Travail.testdate, *
FROM T_Travail
WHERE (((T_Travail.testdate) Between [Formulaires]![F_PeriodeChercher]![DateDebut] And [Formulaires]![F_PeriodeChercher]![DateFin]));

Extrait du code qui ouvre l’état
DoCmd.OpenReport "E_DevisPeriode", acViewPreview, "Requête1"

Bon dimanche.
Messages postés
122
Date d'inscription
lundi 18 juin 2007
Statut
Membre
Dernière intervention
9 mars 2018
7
ok, merci j'essayerai aussi cette solution.
bonne semaine.
Messages postés
9755
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
10 octobre 2020
1 078
Bonjour,
Merci.
Voici la base d'essai, à bien plaire, lancer le formulaire "F_PeriodeChercher" : https://www.cjoint.com/?imoKf5RLel
Messages postés
122
Date d'inscription
lundi 18 juin 2007
Statut
Membre
Dernière intervention
9 mars 2018
7
ok, merci beaucoup, j'avais paramétré mes bases et cela fonctionnait déjà très bien.
Le seul problème que j'ai eu, et que j'ai compris a été lié au fait que dans les requètes je récupérais des informations provenants de plusieurs tables.
Par exemple le nom du projet de la table Projet, le nom du Commercial de la table commercial et le reste des informations des alertes de la table alerte.
j'ai perdu du temps car certains commerciaux n'existaient pas dans des projets et donc ils n'apparaissaient pas dans les état. J'avais du mal a comprendre qu'un commercial numéro 3 marche parfaitement et qu'un autre numéro 1 ne fonctionne pas du tout.
Tout ceci est réglé.
MAis quelle avanture. En tout cas, merci pour ce travail d'équipe.

Très bonne semaine.
Messages postés
9755
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
10 octobre 2020
1 078
Merci, à vous aussi.