Filtre Tableau Croisé Dynamique

Bonjour,

J'ai un tableau croisé dynmamique avec plusieurs champs.
J'ai un champ nommé "Open Time", pour lequel je souhaiterais afficher tous les enregistrements sauf ceux nuls (= "").

J'ai testé plusieurs choses, mais sans succès.

Je pense qu'il faut utiliser le code :

Code:

---

.PivotItems("").Visible = False

---

J'ai essayé de simuler un enregistrement de macro en faisant :

1) Tout sélectionner
2) Décocher les enregistrements vides

Mais le générateur de code, ne fait pas la différence entre selectionner tout et décocher vide.

J'ai également testé une boucle du genre :

Code:

---

1 2 3 4 5 6

With ActiveSheet.PivotTables("PivotTable18").PivotFields("Open Time") For Each pi In .PivotItems If pi.Name <> "" Then .PivotItems(pi.Name).Visible = True Next End With

---

Merci d'avance

Cette commande fonctionne :

Code:

---

1 2 3 4

With ActiveSheet.PivotTables("PivotTable18").PivotFields("Open Time") .PivotItems("").Visible = False End With

---

Il faudrait que je puisse indiquer en dessous

Code:

---

1 2 3 4 5

With ActiveSheet.PivotTables("PivotTable18").PivotFields("Open Time") .PivotItems( <> "").Visible = True End With

---