XL 2013 Utilisation With et Segment

[Yvan1]

Bonjour,

L'un de mes macros met à jour un TCD sans aller sur la feuille concernée, et doit remettre les segments présents sur la feuille Date et Semaine à 0.

With Sheets("Indicateurs Hebdomadaire")
.PivotTables("Tableau croisé dynamique1").PivotCache.Refresh
'.SlicerCaches("Segment_Date1").ClearManualFilter
'.SlicerCaches("Segment_Semaine").ClearManualFilter
End With

Mais les deux lignes SlicerCaches mettent la macro en erreur.

J'imagine que c'est une problème de syntaxe, mais je n'ai pas la solution.

L'un d'entre vous serait-il plus malin ?

Merci d'avance,

Yvan

 

[Cousinhub]

Bonjour,
Sans avoir testé...(pas de fichier....)
L'objet SlicerCache est rattaché au Classeur
Donc

ActiveWorkbook.SlicerCaches...

PS, pense à mettre tes codes entre balises

 

[Yvan1]

Super Cousinhub, c'est parfait.
Encore merci.