Re,
J'ai modifié la macro, voir ci-dessous :
1/ nb de Site OK seulement. nb Eqp erroné
2/ La somme BUD par DPT/SERV n'est pas correcte.
3/ La répartition de la col NOT par PHASE est correcte mais j'ai un problème. Avec
TRés(L, DicTit(Détail(nC_PHASE))) = TRés(L, DicTit(Détail(nC_PHASE))) + Détail(nC_NOT)
La répartition démarre à partir de la même col que la col PHASE du Tableau des données. Pourquoi?
Ci-dessous le coeur de la macro :
For C = 1 To 7: TRés(L, C) = Choose(C, "DPT", "SERV", "Nbr SITE", "Nbr EQP", "Nbr ??", "Nbr ??", "BUD"): Next C
VerserTitres TRés, DicTit
'Stop
For Each Dpt In GigIdx.Gigogne(Null, "DPT", "SERV", "SITE", "EQP")
For Each Serv In Dpt.Co
L = L + 1
TRés(L, 1) = Dpt.ID
TRés(L, 2) = Serv.ID
TRés(L, 3) = Serv.Count 'Nb site
For Each Site In Serv.Co
TRés(L, 4) = TRés(L, 4) + Site.Co(1).Count 'Nb Eqp
For Each Eqp In Site.Co
TRés(L, 5) = Eqp.Count 'Nb eqp
TRés(L, 6) = TRés(L, 6) + 1
TRés(L, 7) = TRés(L, 7) + Eqp.Co(1)(nC_BUD)
For Each Détail In Eqp.Co
TRés(L, DicTit(Détail(nC_PHASE))) = TRés(L, DicTit(Détail(nC_PHASE))) + Détail(nC_NOT)
Next Détail, Eqp, Site, Serv, Dpt
Merci encore
KIM