Sous access97, ma requete est la suivante :
Set MyRS MyDB.OpenRecordset("SELECT * FROM [Rebuts internes] WHERE Month(Date) cadre55.value ORDER BY Date")
( cadre55.value est un entier de 1 à 12 )
elle ne marche pas, alors que si je remplace cadre55.value par une valeur, ça marche, par exemple :
Set MyRS MyDB.OpenRecordset("SELECT * FROM [Rebuts internes] WHERE Month(Date) 4 ORDER BY Date")
je ne l'ai pas tester mais quand tu veut inclure une variable a sur chaine de text du dois l'exclure de tes ""
Set MyRS MyDB.OpenRecordset("SELECT * FROM [Rebuts internes] WHERE Month(Date) " & cadre55.value & " ORDER BY Date")