Slicer en False

Bonjour,

J'aimerai avoir de l'aide pour un petit bout de code svp.

Je voudrais mettre tous les sliceritems en False par défaut et seulement le vide en true.

J'ai le code pour mettre tous en true mais je trouve pas l'inverse.

Code:

---

ActiveWorkbook.SlicerCaches("Segment_Centre").ClearManualFilter

---

voila ma base de travail

Code:

---

1 2 3

With ActiveWorkbook.SlicerCaches("Segment_Centre") .SlicerItems("(vide)").Selected = True End With

---

merci pour votre temps