Mise à jour d'un champ dans un TCD

[Xxaann]

Bonjour,

J'ai un TCD avec plusieurs champs.
Exemple en copie.

Quand je travaille dessus souvent je sélection certaines "coulées".
Je souhaiterais via une macro pouvoir resélectionner toutes les "coulées".

J'espère avoir été suffisamment clair

Xxaann

 

[MJ13]

Re : Mise à jour d'un champ dans un TCD

Bonjour Xxaann

Dans un premier temps je t'encourage à utiliser l'enregistreur de macro.

C'est le genre de problème qu'on peut facilement résoudre grâce à Henry 😱.

 

[gbinforme]

Re : Mise à jour d'un champ dans un TCD

Bonjour,

Je souhaiterais via une macro pouvoir resélectionner toutes les "coulées".

Avec ce bout de code à mettre dans un bouton par exemple cela devrait fonctionner :

For Each elm In ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Coulée").PivotItems
    elm.Visible = True
Next

 

[Xxaann]

Re : Mise à jour d'un champ dans un TCD

Merci pour votre aide.
Le code fonctionne très bien.

J'utilise régulièrement l'enregistrement de macro; mais dans ce cas, cela ne va pas très bien...

Encore merci et bonne journée