Bonjour

jai deux TCD dans deux onglets différents tcd1 et tcd2.

dans un troisieme onglet j'ai un autre TCD avec juste deux filtres de rapport.

J'ai fait une macro pour mettre à jour les tcd1 et tcd2 à partir de mes deux filtres de rapports dont voici le code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Sub synchro_tcd()
 
magasin = Range("c8").Text
type_mag = Range("c9").Text
 
Sheets("tcd1").PivotTables("Tableau croisé dynamique1").PivotFields("Magasin").CurrentPage = magasin
Sheets("tcd2").PivotTables("Tableau croisé dynamique2").PivotFields("Magasin").CurrentPage = magasin
 
Sheets("tcd1").PivotTables("Tableau croisé dynamique1").PivotFields("Type Mag").CurrentPage = type_mag
Sheets("tcd2").PivotTables("Tableau croisé dynamique2").PivotFields("Type Mag").CurrentPage = type_mag
 
End Sub
je n'ai pas de probleme qd je selectionne tous les criteres ou un seul critère, mais ds que je selectionne plus que deux criteres la macro plante, aie aie aie !!

Avez vous une soluion ?

D'avance merci

Wannn