This query...
SQLs = "SELECT Nom, DateSam, Job,Di, Lu, Ma, Me, Je,Ve,Sa, Taux_Km FROM Data" & _
" WHERE [Data.DateSam] >=datevalue('" & DateDebut.Value & "') AND [Data.DateSam]<=" & _
"datevalue('" & DateFin.Value & "') AND [Data.Job] =" &...