Faire une selection par mois en Vba

Version imprimable

Bonjour,

Quelqu'un peut me dire comment je peux sélectionner seulement les champs de janvier (peut importe l'année) en VBA ?

Code:

1
2
3
4
5
6
7
8
  With CodeContextObject
        .ListeMod = "Liste des stagiaires (Non-Archivé)ayant suivi l'action de formation"
        DoCmd.OpenReport "S_p_C2", acViewPreview, "", "[Archiver] Like ""0"" And 'je voudrais mettre ici ma candition, seuleument les stagiaires de janvier'", acNormal
        If (MsgBox("Voulez-vous imprimer ?", 4) = 6) Then
            DoCmd.PrintOut acPages, , , acHigh, 1#, True
            DoCmd.Close acReport, "S_p_C2"
        End If
    End With

Merci beaucoup

31/07/2012, 10h48
lelensois16

Bjr,

difficile d'aller loin , on aimerait avoir plus d'info sur la requête alimentant le formulaire "S_p_C2". Le code sql peut nous aider

Cdt
31/07/2012, 11h01
Ram34

Merci de ta réponse,
Voici les infos :

"S_p_C2" est un état (tu dois t'en douter !) alimenter par une requête ou figure un champ date.

Ma question est peut être très simple,
comment sélectionner seulement les enregistrements en 'janvier' ???
31/07/2012, 13h22
User

Salut,

Il y a plusieurs façon de faire, par exemple:

Code:

DoCmd.OpenReport "S_p_C2", acViewPreview, "", "[Archiver] Like ""0"" And Month([ChampDate])=1", acNormal

Tu peux aussi préciser l'année en plus dans ta condition avec:

Code:

Year([ChampDate])=2012

A+
01/08/2012, 13h41
Ram34

Merci

CA marche nikel !!