salut,
le requete que j ai trouvé grace à vous ça marche, impec, je voudrais savoir comment ajouté un critére tot2 (fiche retraité par la personne) à cette requete****(comment pui-je inserer le critere tot2)

voila marequete :

req = "select sum(pa.pa_pause) as pause1,sum(pa.pa_autre) as autre1,sum(pa.pa_time) as temps1, " & _
" tot1,per.per_nom as pernom from pause_ta pa join personne per on pa.per_id = per.per_id " & _
" join (select count(fiche.per_id) as tot1,per2.per_id ,per2.per_nom " & _
" from fiche join personne per2 on fiche.per_id = per2.per_id " & _
" where fic_date_creation between '" & txtDateDebut.Text & "' and '" & txtDateFin.Text & "' " & _
" group by per2.per_nom,per2.per_id) A on A.per_id=per.per_id and A.per_nom=per.per_nom " & _
" where pa_date between '" & txtDateDebut.Text & "' and '" & txtDateFin.Text & "' " & _
" group by tot1,per.per_nom "

vrs.Open req, vcon
i = 11
Do While Not vrs.EOF
oExcelSheet_ab.Cells(i, 14).Value = vrs("pernom")<<<----nom personne
oExcelSheet_ab.Cells(i, 15).Value = vrs("tot1")<<<-----fiche traité pr pers
oExcelSheet_ab.Cells(i, 16).Value = vrs("tot2")<<---fiche retraité pr pers **
oExcelSheet_ab.Cells(i, 16).Value = vrs("pause1")<<<---pause personne
oExcelSheet_ab.Cells(i, 17).Value = vrs("autre1")<<<----pause autre
oExcelSheet_ab.Cells(i, 18).Value = vrs("temps1")<<<---temps cummul

i = i + 1
vrs.MoveNext
Loop
vrs.Close