Bonjour à tous

Je suis debutant en VBA sous excel je dois faire une requete dont la quelle il y a pas de condition mais j'ai une erreur de syntaxe merci de m'aider à la resoudre

Voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String
Set db = DAO.OpenDatabase("m:\PublicLCommun\SUIVI DE PRODUCTION\Stage Yassine\Suivie de Production.mdb", False, False)
strSQL = "SELECT Sum(Compteur d'Heure) AS [SommeDeCompteur d'Heure], " & _
   "Sum(Relevé Compteur d'Heure) AS [SommeDeRelevé Compteur d'Heure] " & _
   "FROM TableMaintenance "   'Erreur de syntaxe operateur absent
   Set rs = db.OpenRecordset(strSQL, DAO.dbOpenSnapshot)
   Feuil2.Range("C8").Value = rs.Fields(0)
   Feuil2.Range("D8").Value = rs.Fields(1)
'close recordset
rs.Close
Merci