Pb access

Fermé
dom - 18 déc. 2014 à 20:04
 dom - 19 déc. 2014 à 15:35
Bonjour,

J'ai créé une requête récupérant tous les inscrits né au mois de ...
en répondant */12/* par exemple
et ça marche très bien

SELECT T_Tjudo.[Né le], T_Tjudo.Nom, T_Tjudo.Prénom, T_Tjudo.Cours
FROM T_Tjudo
WHERE (((T_Tjudo.[Né le]) Like [Exemple tapez */01/*]) AND ((T_Tjudo.abandon)=No))
ORDER BY T_Tjudo.[Né le];

Je voudrais ne plus taper au clavier */11/* mais remplacer cela par une liste déroulante
comment faire ?
j'ai essayé avec : DoCmd.OpenReport ..... mais je n'y arrive pas

1 réponse

le meruvien Messages postés 1125 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 décembre 2024 40
19 déc. 2014 à 06:28
bonjour,
Ton champ de saisie du mois, tu le fait en liste déroulante basée sur une table ou une liste avec tous les mois de 1 à 12.que tu appel par exemple LDmois.
Et apres mise à jour de la liste, si ton ton champ s'appel "mois", tu met:
[mois]="*/" & ldmois & "/*"
roger
0
Ca marche avec ça mais ce que je veux c'est tous les adhérents du mois choisi par ma liste déroulante 171 ; il me faudrait le caractère générique pour remplacer 16 et 1963,
choixmois = "[Né le]=" & "'" & "16/0" & Me![Modifiable171] & "/1963" & "'"
j'ai essayé * , %, ? mais rien à faire ça veux pas marcher


Private Sub Modifiable171_AfterUpdate()
On Error GoTo Err_Commande171_Click

Dim stDocName As String
Dim choixmois As String
choixmois = "[Né le]=" & "'" & "16/" & Me![Modifiable171] & "/1963" & "'"

stDocName = "listeanniv"
DoCmd.OpenReport stDocName, acPreview, , choixmois
Exit Sub
Err_Commande171_Click:
MsgBox Err.Description

End Sub
0
le meruvien Messages postés 1125 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 décembre 2024 40 > dom
19 déc. 2014 à 15:00
et ben met tout sans le 16 et le 1963!!
choixmois = "[Né le]= " & Me![Modifiable171]
0
dom > le meruvien Messages postés 1125 Date d'inscription vendredi 12 août 2011 Statut Membre Dernière intervention 15 décembre 2024
19 déc. 2014 à 15:35
ça marche pas non plus
0