Bonjour,
 
En VBA Je n'arrive pas à utiliser la fonction "xlaverage" lors de la création d'un tableau croisé dynamique. je crée le tableau sans préciser la fonction ( xlsum par défaut).
Ensuite je dois l'ouvrir dans Excel et cliquer droit dans la colonne concernée sur "Synthétiser les valeurs par" ... Moyenne  
En effet dan mon programme VBA l'instruction ActiveSheet.PivotTables("xxx" ).PivotFields(2).Function = xlAverage provoque l'erreur "impossible de définir la propriété Function de la classe PivotFields"
Pourtant le web propose comme exemple :
ActiveSheet.PivotTables("PivotTable1" ) _  
 .PivotFields("Sum of 1994" ).Function = xlSum
 
Merci de vos lumières