VBA + SQL + Access probleme d'exécution

Bonjour j’ai un probleme d’éxécution il me met impossible d’effectuer la requete sélection et je ne comprends pas pkoi l’erreur est a dbCourant.execute (Sql)
Merci d’avance


Dim dbCourante As DAO.Database

'Définir la base de travail comme la base actuelle
Set dbCourante = CurrentDb

'Définir la requête
Sql = " SELECT PJPF2006_T3.OPPO, PJPF2006_T3.MPE, PJPF2006_T3.MPF, PJPF2006_T3.MRE, PJPF2006_T3.MRF, PJPF2006_T3.M__, '2006_T3' AS année FROM PJPF2006_T3 WHERE (((PJPF2006_T3.CBQD)='total') AND ((PJPF2006_T3.MOIS)='total') AND ((PJPF2006_T3.CMOP)='total'));"

'Exécuter la requête
dbCourante.Execute (Sql)

Set dbCourante = Nothing

Tu te serais pas gourré en publi postant ?

oui désolé j’avais pas fais gaffe