pouya922
Messages postés1Date d'inscriptionlundi 16 mars 2015StatutMembreDernière intervention16 mars 2015
-
16 mars 2015 à 12:08
Bonjour,
J'ai un problème avec la création de TCD via VBA...
J'ai essayé la semaine dernière d'en créer un dans un fichier, et comme c'était un peu compliqué j'ai fini par m'enregistrer en train de faire le TCD. La macro fonctionnait ensuite nickel (et elle fonctionne encore très bien).
Cette semaine, j'ai voulu refaire la même macro dans un autre fichier. Les données de ce second fichier sont rangées exactement de la même façon que dans le premier fichier (mêmes titres de colonnes etc), seuls les chiffres changent. J'ai donc copié collé l'ancienne macro dans une nouvelle.
Seulement quand je la lance dans le second fichier, le message d'erreur suivant s'affiche : "Impossible de lire la propriété PivotFields de la classe PivotTable".
Et ça concerne cette ligne-là :
ActiveSheet.PivotTables("TCD XPI").AddDataField ActiveSheet.PivotTables( _
"TCD XPI").PivotFields("XPB1 Income before tax"), _
"Nombre de XPB1 Income before tax", xlCount
Ne sachant pas du tout où était le problème, j'ai décidé de m'enregistrer à nouveau pour voir si quelque chose changeait, mais ça me remet exactement le même code!!
Une idée de la raison pour laquelle j'ai ce message d'erreur?