Bonjour, je souhaite filtrer un TCD à partir d'une plage de donnée que j'ai nommé.
Un seul filtre fonctionne très bien pour un TCD via le code ci dessous, par contre je ne peux pas filtrer plusieurs arguments sur un même TCD. La macro bug et je n'arrive pas a savoir pourquoi.
J'ai attaché mon fichier au cas ou
Dim result As String
result2 = Range("CODE").Value
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
"SKU").CurrentPage = result2
Dim result As String
result = Range("FOURNISSEUR").Value
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
"DISTRIBUTEUR").CurrentPage = result
Un seul filtre fonctionne très bien pour un TCD via le code ci dessous, par contre je ne peux pas filtrer plusieurs arguments sur un même TCD. La macro bug et je n'arrive pas a savoir pourquoi.
J'ai attaché mon fichier au cas ou
Dim result As String
result2 = Range("CODE").Value
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
"SKU").CurrentPage = result2
Dim result As String
result = Range("FOURNISSEUR").Value
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotFields( _
"DISTRIBUTEUR").CurrentPage = result