Discussion :

[novice06]

bonjour,

dans un formulaire nommée Formulaire1 j'ai créé de zone de texte:
une que j'ai nommée "datedebut" et la 2ème "datefin" au format date,abrégé avec comme masque de saisie 99/99/00;_

j'ai une requête qui contient un champ date qui est alimenté avec les dates de 2009 du 01/01/2009 au 31/12/2009 et les champs qui suivent sont des nombres
lorsque pour le champ date je mets le critère :

Code :

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

>=[Formulaire]![Formulaire1]![datedebut] ET <=>=[Formulaire]![Formulaire1]![datefin]

et pour les autres champs je demande la somme des nombres entre les 2 dates choisies

dans le formulaire je mets un bouton de commande qui demande l'exécuter de la requête en question mais forcément au lancement de la requête il me demande la date de début et la date de fin

Comment faire pour qu'en cliquant sur le bouton la requête se lance et donne automatiquement le résultat et prenant les dates inscrites dans le formulaire dans les 2 zones textes

merci par avance

[User]

Tu peux nous donner le sql comptet de ta requête ?

A+

[novice06]

Oui biensur

sql sortie du mode sql de la requête nommée "Form_UO_Jours":

Code :

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

1
2
3
4
SELECT Req_TGraphiques.[N° de Ligne], Req_TGraphiques.[N° de Société], Sum(TUniteOeuvres.[Nbre de Courses]) AS [SommeDeNbre de Courses], Sum(TUniteOeuvres.[Heures Commerciales]) AS [SommeDeHeures Commerciales], Sum(TUniteOeuvres.[Heures Totales]) AS [SommeDeHeures Totales], Sum(TUniteOeuvres.[Kilomètres Commerciaux]) AS [SommeDeKilomètres Commerciaux], Sum(TUniteOeuvres.[Kilomètres Totaux]) AS [SommeDeKilomètres Totaux], Sum(TUniteOeuvres.[Kilomètres HLP]) AS [SommeDeKilomètres HLP]
FROM (Req_TGraphiques INNER JOIN TUniteOeuvres ON (Req_TGraphiques.[N° de Graphique] = TUniteOeuvres.N°graphique) AND (Req_TGraphiques.[N° de Ligne] = TUniteOeuvres.N°ligne) AND (Req_TGraphiques.[N° de Société] = TUniteOeuvres.Ste) AND (Req_TGraphiques.[N° Cas Particulier] = TUniteOeuvres.CasCalendrier)) INNER JOIN TLignes ON TUniteOeuvres.N°ligne = TLignes.TLignesN°Ligne
WHERE (((Req_TGraphiques.Date)>=[Formulaire]![Formulaire1]![datedebut] And (Req_TGraphiques.Date)<=[Formulaire]![Formulaire1]![datefin]))
GROUP BY Req_TGraphiques.[N° de Ligne], Req_TGraphiques.[N° de Société];

procédure évennementielle après validation de la date choisie dans la zone texte "datefin" du formulaire:

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
Private Sub datefin_AfterUpdate()
 
 
If Me.datefin < Me.DateDebut Then
    Me.DateDebut = Me.datefin
    End If
Me.Refresh
 
 
On Error GoTo Err_datefin_AfterUpdate:
 
    Dim stDocName As String
 
    stDocName = "Form_UO_Jours"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
 
Exit_datefin_AfterUpdate:
    Exit Sub
 
Err_datefin_AfterUpdate:
    MsgBox Err.Description
    Resume Exit_datefin_AfterUpdate
End Sub

merci

[User]

essaie avec:

Code :

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

1
2
3
[Formulaires]![Formulaire1]![datedebut]
et
[Formulaires]![Formulaire1]![datefin]

dans ton sql

ou encore

Code :

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

1
2
3
Forms!Formulaire1!datedebut
et
Forms!Formulaire1!datefin

n'oublie pas aussi d'ajouter ces 2 parametres à ta requete (menu outils->Parametres...)

A+

[novice06]

Bonjour,

j'ai bien remplacer

Code :

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

1
2
3
[Formulaire]![Formulaire1]![datedebut]
et
[Formulaire]![Formulaire1]![datefin]

PAR

Code :

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

1
2
3
[Formulaires]![Formulaire1]![datedebut]
et
[Formulaires]![Formulaire1]![datefin]

mis dans les paramètres datedebut et datefin

mais lorsque dans le formulaire je valide après avoir entré la date de fin (datefin) j'ai toujours une box qui me demande à nouveau la datedebut et datefin

comment éviter cette resaisie des dates qui ont déjà été tapées dans les textbox datedebut et datefin intégré au formulaire

merci

[novice06]

bonsoir,

doit-on ou peut-on mettre une condition dans ce code

Code :

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

1
2
3
4
5
 
Dim stDocName As String
 
    stDocName = "Form_UO_Jours"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

pour que cela prenne en considération en appelant la requête la datedebut et datefin choisie dans le formulaire ?

merci

[User]

Non, les parametres

Code :

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

1
2
3
Forms!Formulaire1!datedebut
et
Forms!Formulaire1!datefin

sont fait pour ca,

pour moi c'est une erreur de synthaxe,

si ton formulaire s'appelle "Formulaire1" et ton textbox "datedebut",
alors essaie avec:

Code :

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

forms!Formulaire1!datedebut

enleve aussi le

Code :

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

Me.Refresh

pour voir

A+

[novice06]

merci mais malheureusement cela ne change rien...

je continu à mettre dans la textbox "datedebut" la date de début et dans la textbox "datefin" la date de fin et en validant ... rebelote il faut que je rentre à nouveau ces 2 dates dans le message box qui s'affiche; en fait comme si je lance directement la requête depuis les Requêtes

je retrouve coincé alors que tous les paramètres me semblent corrects !?

si une idée vous vient ...


merci

[User]

Excuses moi mais tu as bien mis:

Code :

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

1
2
3
Forms!Formulaire1!datedebut
et
Forms!Formulaire1!datefin

dans le sql et dans le menu parametres de la requête (avec comme type date)

Sinon tu es sous Access 2003 ?

[novice06]

ok tout va bien et en même temps comme boulet je me pose là !

erreur de paramètrage de la requête

j'avais bien mis dans le sql :

Code :

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

1
2
3
Forms!Formulaire1!datedebut
et
Forms!Formulaire1!datefin

mais seulement

Code :

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

datedebut et datefin

dans les paramètres de la requête

merci encore de ton aide