Alors la méthode utilisée est la requête Sql suivante :
Req = "SELECT `Activite`"
For i = 2 To UBound(T1)
Req = Req & ", SUM(IIF(`Département` = " & T1(i, 1) & ", 1, 0)) AS `" & T1(i, 1) & "`"
Next i
Req = Req & " FROM " & Bdd & _
" WHERE NOT ISNULL(`Département`)" & _
" GROUP BY `Activite`"
Pour le graphique, j'ai fait des tests, mais c'est très laid. Je voulais faire des camemberts centrés sur chaque département, mais ça se chevauche, donc illisible (voir image moche ci-dessus). Est-ce qu'il y aura beaucoup de département à traiter?
Pierre