Bonjour à tous,
Voilà j'ai une table avec un champ date.
Par rapport à une date je veux voir les incidents rencontrés sur les 12 derniers mois.
Quelqu'un a t'il une idée sur la façon de faire ?
Merci par avance.
Bonjour à tous,
Voilà j'ai une table avec un champ date.
Par rapport à une date je veux voir les incidents rencontrés sur les 12 derniers mois.
Quelqu'un a t'il une idée sur la façon de faire ?
Merci par avance.
salut,
tu peux placer un filtre sur ton champs de type date avec des critères comme
ou
Code : Sélectionner tout - Visualiser dans une fenêtre à part TonChampDate > Date()-365
Code : Sélectionner tout - Visualiser dans une fenêtre à part TonChampDate > dateadd("yyyy",-1,date)
Bonjour jpcheck,
Je suis parti sur ta 2nde solution et j'obtiens bien un historique sur les 12 derniers mois.
J'indique mon code si cela peut servir à d'autres personnes.
Je pars d'un formulaire qui me permet de sélectionner une date à l'aide d'un DTPicker puis affiche le résultat dans un formulaire en continu basé sur une requête qui récupère mes deux dates ( celle sélectionnée à l'aide du DTPicker et celle calculée ).
Un grand merci pour tes pistes
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
21
22
23
24
25 Private Sub Commande24_Click() Dim datefinn99 As Date Dim datedebut99 As Date Dim typerecul As String Dim nombremois As Integer Dim stDocName As String 'Récupère la date sélectionnée dans le formulaire datefin99 = [Forms]![F_recherche_sur_12_mois_glissant]![choixdate] ' "m" indique l'intervalle en mois. typerecul = "m" ' affecte -12 à la variable nombremois nombremois = -12 'Calcul la nouvelle date en fonction de la date sélectionnée et y retire 12 mois datedebut99 = DateAdd(typerecul, nombremois, datefin99) 'affecte la date sélectionnée au champ texte "dateretenue" et la date calculée sur le champ texte "datecalculeedebut"" [Forms]![F_recherche_sur_12_mois_glissant]![datecalculeedebut] = datedebut99 [Forms]![F_recherche_sur_12_mois_glissant]![dateretenue] = datefin99 'charge le nom du formulaire basée sur la requête utilisant la date sélectionnée et celle calculée stDocName = "F_résultats_recherche_sur_12_mois_glissant" DoCmd.OpenForm stDocName End Sub![]()
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager