Discussion :

[marg0t]

Bonjour à tous,

Actuellement en stage, je réalise une base de données pointages. Cette base servira aux employés pour effectuer leur pointage du mois.
Il existe deux types d'employés: ceux qui peuvent uniquement effectuer leur pointage et ceux qui peuvent effectuer leur pointage et voir le pointage des autres (ceux sont des responsables).
A la fin du mois le responsable valide les pointages des employés.

Mes responsables de stage veulent qu'à une date donnée, le reponsable clique sur un bouton, et tous les pointages de tous les employés qui ont été validés s'impriment.

Etant novice en vba je ne sais pas si cela est possible si oui merci de me donner des pistes.

Merci à tous de votre aide.

Marg0t

[User]

Bonjour,

La première chose à faire c'est de construire ta requête :

Elle fera le lien entre la table des pointages et la table des employés avec un critère qui ne retient que les pointages validés (ex.: T_Pointage.Validé=true) et les date inférieure à une date passée en paramètre (ex.: T_Pointage.DatePointage<=Forms!EditerPointageValidé!DateParam)

Ensuite tu bases ton état sur cette requête...

A+

Denis

[marg0t]

Bonjour User,

Je suis entrain de faire la requête que tu proposé. Passer une date en paramètre d'accord je sais le faire mais est-ce qu'il est possible que chaque mois cette date change? Parce qu'en général les pointages sont imprimés par exemple le 5 du mois suivant comme je peux dire ce paramètre pour la requête?

[User]

Bonjour,

Dans ce cas tu peux te servir de la fonction Date(), qui renvoie la date d'aujourd'hui

[marg0t]

Ok sa marche, la requête est au point.
Donc je crée l'état que je base sur cette requête et ensuite???

[User]

Ensuite tu appelles l'état depuis un bouton de commande, en VBA ça ferait :

Code :

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

1
2
3
4
Private Sub CmdImprimer_Click()
DoCmd.OpenReport "TonEtat", acViewPreview
 
End Sub

Ici le bouton de commande se nomme "CmdImprimer".

a+