Bonsoir tout le monde
J'ai donc une zone de liste déroulante affichant mes semaines s'appelant ModifiableSemaine
et j'ai crée un bouton en dessous j'aimerais lorsque je clique sur le bouton (evenement sur clic ) cette requête ci s'ouvre.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 SELECT Count(ENFANTS.Num_enfant) AS Expr1 FROM ENFANTS, INSCRITS, SEMAINES WHERE (((ENFANTS.Num_enfant)=[INSCRITS].[Num_enfant]) AND ((INSCRITS.Num_semaine)=[SEMAINES].[Num_semaine]) AND ((SEMAINES.Nom)=' " & me.ModifiableSemaine.Value & " ') AND ((SEMAINES.Annee)=Year(Now())));
J'ai essayé en enregistrant la requête ( nom : Nb_repas)
et en mettant ce code sous l'événement sur clique du bouton
Mais lors de mon test:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Dim nbrepas as string nbrepas= "Nb_repas" DoCmd.OpenQuery nbrepas, acNormal, acEdit
- je choisi la semaine dans la zone de liste
- et je clic sur le bouton
j'ai comme message d'erreur
" Type de données incompatibles dans l'expression du critère"
Je ne sais pas si ça vient de la requête , ou bien du code Vba pour l'ouverture de la requête.
Partager