Cocher les données d'un TCD

[pomunho]

Bonsoir,

J'ai un tcd avec énormément d'article.
Parallèlement, j ai une liste. Je dois cocher tous les éléments qui figure sur cette liste dans mon tcd.
Existe il un code VBA peut être?
Merci de votre aide

Vanessa

 

[kjin]

Re : Cocher les données d'un TCD

Bonsoir, Le squale 🙂,
Henry dirait tout simplement...

Sub Macro1()
Dim pv As PivotItem
With ActiveSheet.PivotTables(1).PivotFields("Dates")
    For Each pv In .PivotItems
        pv.Visible = True
    Next
End With
End Sub

...ici avec le champ nommé "Dates" du premier TCD
A+
kjin