Discussion :

[isma616]

Bonjour,

je cherche un moyen pour forcer le calcul de la moyenne dans les tableau croisé dynamique d'un classeur excel.
Voici mon code qui ne marche pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
For Each ws In ActiveWorkbook.Worksheets
        For Each pt In ws.PivotTables
            pt.RefreshTable
            For Each pf In pt.PivotFields
            pf.Function = xlAverage
                For Each pi In pf.PivotItems
                next
             next
        next
next

Merci d'avance