Discussion :

[nibelhung]

Bonjour à tous!

Je vous écris pour un souci VBA sur une de mes macros
Malheureusement je ne peux pas vous envoyer la macro complete car professionelle...

Cependant, j'aimerais savoir si certains d'entre vous ont deja eu un souci sur la propriété PivotFields en passant sous Excel 2013
En effet, ma macro fonctionne bien sur Excel 2010 mais bug sous Excel 2013 : "Impossible de lre la propriété PivotFields de la classe PivotTable"

Les lignes en question:

ThisWorkbook.Sheets(TABLE_NAME).PivotTables(TABLE_NAME).PivotFields(COLUMN_NAME).Orientation = xlColumnField
ThisWorkbook.Sheets(TABLE_NAME).PivotTables(TABLE_NAME).PivotFields("Somme de " & COLUMN_NAME).Function = xlCount
ThisWorkbook.Sheets(TABLE_NAME).PivotTables(TABLE_NAME).PivotFields("Somme de " & COLUMN_NAME).Calculation = xlPercentOfRow

Les deux premières lignes passent, mais la 3e renvoi une erreur....

Chose curieuse (je débute en VBA), en placant un espion sur "ThisWorkbook.Sheets(TABLE_NAME).PivotTables(TABLE_NAME)" je ne trouve pas la propriété "PivotFields" dans la liste...

Merci pour votre aide

[clementmarcotte]

Bonjour,

Je n'ai pas Excel 2013, mais, si c'est comme pour Excel 2010, il devrait y avoir à quelque part dans l'aide, la liste des modifications au modèle objet, si jamais il y en a.