TCD Macro - Pré choix Row Field

Bonjour à tous,

Je construis un TCD à l'aide d'une macro et je souhaiterais pré choisir les données affichées en ligne.
J'ai 2 "tri" en ligne (RowField) :
- L'activité
- Puis 12 lignes de données en fonction de ces activités.

Je souhaiterais pré choisir plusieurs activités.
Est-ce possible ?

Je sais que l'on peut faire le choix d'une données de Page : ActiveSheet.PivotTables(NomTable).PivotFields("Activité"). _CurrentPage = "BOMTAS"

Peut-on transposer cela aux lignes ET en choisir plusieurs ?

Merci d'avance pour vos conseils.

Bonjour,

La macro suivante filtre les items "Activité3" et "Activité5" du champ "Activité" (voir classeur joint) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub test() Dim PI As PivotItem With ActiveSheet.PivotTables(1).PivotFields("Activité") For Each PI In .PivotItems If PI.Name = "Activité3" Or PI.Name = "Activité5" Then PI.Visible = True Else PI.Visible = False End If Next PI End With End Sub

---