VBA TCD Pivotfield Variable

Bonjour à tous,

J'ai déjà un tableau, que je dois mettre sous forme de TCD pour agréger des données (la catégorie) . J'intègre le TCD au sein d'une macro afin qu'il puisse varier d'années en années. il est structuré comme suit :
- Etiquette de ligne: Le code catégorie
- Etiquette de colonne: Rien.
- Somme de valeur: Les années.

Problème:
Mes années sont variables, et je voudrai pouvoir créer un TCD dynamique. j'ai 14 "sommes de valeurs, correspondant aux 14 années. la 1èere est 2014 , ensuite 2013 etc.. mais l'année prochaine, ma première sera 2015 , la seconde 2014 etc... comment faire ?!

Je joins le fichier!

regardes la pièce jointe

Bonjour

Pour info en partant d'une source structurée comme une BD (une seule colonne année avec les valeurs 2001, 2010, 2014...) et non déjà à double entrée, pas besoin de VBA, cela marche tout seul et en plus on peut, si besoin, faire des comparaison dans le TCD d'une année à l'autre, ce qui n'est pas aisément faisable avec cette structure...

je ne suis pas tout à fait d'accord, si son tableau provient d'un traitement automatisé, il devra refaire un traitement pour transposer les données au bon format, alors que le tdc est prévu pour faire ça avec un minimum de traitement. je ne sais pas qui et comment génère son tableau c'est pour cela que j'ai proposé ma solution!

Bonjour

rdurupt : loin de moi de critiquer ta solution :oops: ! Tes interventions sont toujours impec !

C'est juste une remarque pour le demandeur : certaines sources se prêtent mieux à l'exploitation par TCD que d'autres. Parfois rien ne justifie la présentation choisie à part l'habitude ou même le hasard. Si on peut la changer c'est tout aussi bien.

Comme je le disais, si on garde une colonne par année, il faut autant de champs en valeurs que d'années et si on veut ajouter des évolutions on est obligé de passer par des champs calculés alors qu'avec la source comme suggérée tout cela se fait par quelques clics...

non je te rassure je n'ai pas du tout pris ça pour moi, c'était juste un commentaire. si c'est lui qui défini le format du tableau Excel, alors tu as parfaitement raison si c'est un export base de données ou autre ou un format imposé, le tdc est moins coûteux en traitement.

Merci à vous deux c'est top. Beau cadeau après un retour de we !

En fait je dois passer par une macro car c'est une étape qui est déjà intégrée à ma macro, et je la fais pour des besoins professionnels. Je dois donc faire en sorte qu'en cliquant sur un bouton, tout le travail soit fait par cette macro.

Une dernière petite question: je souhaite diviser tous les chiffres de ma base par 100. Quand je mets ce code:

Code:

---

Range("R:V") = Range("R:V") / 100

---

J'ai comme message d'erreur "incompatibilité de type". Ce qui est étonnant c'est que cela marche quand je le fais sur une seule cellule, mais pas sur des colonnes entières.

Bonne journée

tu ne peux pas diviser un tableau par un autre tableau dans ton exemple lui même

Code:

---

1 2 3 4 5

For l = 2 To Sheets("baseannulpr").UsedRange.Rows.Count For C = 0 To 4 Sheets("baseannulpr").Range("R" & l).Offset(0, C) = Sheets("baseannulpr").Range("R" & l).Offset(0, C) / 100 Next Next

---