Je reviens vers vous après avoir appliqué la macro à mon fichier de données. J'ai rencontré qulques problèmes que je n'ai pas pu résoudre et vous en remercie d'avance de votre aide.
1- j'ai intégré une 3 ième condition "Type", Col E, feuil "Base" dans la macro grouper3. J'ai essayé de modifier le calcul dans la fonction sumproduct:
Tbl(L, 4) = Evaluate("sumproduct((colb = """ & Tbl(L, 2) & Tbl(L, 3) & """)*colf)")
Tbl(L, 5) = Evaluate("sumproduct((cola=""" & Tbl(L, 1) & Tbl(L, 3) & """)*colf)")
Cela ne me donne rien.
2- le nombre de Divisions par SITE et le nombre de Bâtiment par site doit aussi prendre en considération la condition "Type".
3- les lignes dont le "Type" n'est pas renseigné ne doivent pas être pris en compte.
Voir résultat dans la feuil "By Site" en jaune