Discussion :

[fabian_945]

Bonjour,

j'ai une requete qui me calcule les hrs de travail effectué sur le mois par des ouviers.

Code :

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

1
2
3
4
5
6
7
8
 
PARAMETERS [Entrez le N° du mois:] Short, [Entrez l'année:] Short;
TRANSFORM MinToTime((Nz(Sum(T_TravailOuvrier.[TotHrOuvrier]),"0"))*1440) AS SommeDeQuantité
SELECT T_TravailOuvrier.IdOuvrier AS Nom, MinToTime((Nz(Sum(T_TravailOuvrier.[TotHrOuvrier]),"0"))*1440) AS total
FROM T_TravailOuvrier
WHERE (((Year([DateOuvrier]))=[Entrez l'année:]) AND ((Month([DateOuvrier]))=[Entrez le N° du mois:]))
GROUP BY T_TravailOuvrier.IdOuvrier
PIVOT T_TravailOuvrier.DateOuvrier;

je voudrais utiliser cette requete dans un formulaire et afficher le résultat dans un champ texte par exemple pour un employé particulier et un mois et une année choisie.
j ai une deuxieme requete qui calcule les hrs de recup sur le mois de la meme façon que celle plus haut.
j espere que je m explique bien car je suis en train de me perdre dans mes idees et la mise en pratique devient un peu n importe quoi :-)
le but est de gérer le nbre d' hrs de travail et des recup (avec bien sur la gestion des hrs de recup prises)
je vous remercie de votre aide

Fab

[LedZeppII]

Bonjour,

Essaie la fonction domaine DSum.

Exemple en VBA.
On suppose de que le formulaire a les zones de texte suivantes :
IdOuvrier
Annee
Mois
TotalMois

Code :

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

1
2
3
4
5
6
7
8
9
10
Dim strConditionWhere as String
Dim lngSomme as long, lngSommeTmp as long
 
strConditionWhere = "IdOuvrier=" & Me.IdOuvrier & _
                    " AND Year([DateOuvrier]) = " & Me.Annee & _
                    " AND Month([DateOuvrier]) = " & Me.Mois
lngSommeTmp = Nz(DSum("TotHrOuvrier", "T_TravailOuvrier", strConditionWhere), 0)
lngSomme = MinToTime(lngSommeTmp)*1440
 
Me.TotalMois = lngSomme

A+