Boucle sur étiquettes de lignes d'un TCD

Bonjour à tous,

j'espère que vous allez bien

Je reviens vers vous car je bloque sur un code... Voici la situation :

Je dispose d'un tableau croisé dynamique composé de la sorte :

Etiquette de ligne 1 : date
Etiquette de ligne 2 : n° de tel
Valeurs : nombre de "n° de tel".

Ce tableau est filtré sur toutes les valeurs (n° de tel) supérieures ou égales à 2, ce qui me permet d'avoir une liste, par date, de tous les numéros de téléphone identifiés 2 fois ou plus.

Je souhaiterai boucler (via une boucle for- next ) sur toutes les étiquettes de lignes visible ("date") et copier ensuite la liste des numéros de tel associés à cette date, pour ensuite les copier autre dans un tableau structuré dont les colonnes portent le nom des dates (mais ça je saurai faire).

Après de nombreuses heures de recherche et de test, j'arrive à une limite, je m'y perds entre les "pivotfields, "pivotitems", "datarange" etc... car je ne maitrise pas du tout cet aspect de VBA...

D'avance, un grand merci pour l'aide que vous pourrez m'apporter. je joins en PJ un classeur pour exemple, comportant ma médiocre tentative avec une boucle for each (mais c'est une boucle "for : i to xx next" qui m'intéresse le plus.

12test.xlsm (31.92 Ko)

Bonjour

Si tu tiens au VBA , une redisposition du TCD et une plage nommée te permettront une boucle sans passer par les objets du TCD

Une autre solution PowerQuery ci-joint (intégéré à Excel 2016 et +, en addon sur 2010 et 2013)

S'actualise comme un TCD par clic droit

16telephones-pq.xlsx (26.18 Ko)

Edit : je n'ai pas posté le bon fichier, voici celui où j'ai restructuré le TCD et créé une plage nommée

Bonjour @78chris

Merci pour ce retour.

Je ne connaissait pas PowerQuery, toutefois, je ne peux envisager cette solution car mon entreprise ne me permet pas d'ajouter des add-on...

RE

Je comprends pas que des entreprises qui bossent avec des versions qui ont plus de 11 ans n'installent pas au moins les add on Microsoft...

Rechercher des sujets similaires à "boucle etiquettes lignes tcd"