Code VBA filtre "Sélectionner tout"

Bonjour à tous!

J'ai une question technique à vous soumettre que je n'arrive pas à résoudre.

J'ai crée une macro (en utilsant le générateur de macros) qui actualise un TCD (tableau croisé)...

Code:

---

1 2 3

ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotCache.Refresh With ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("Date") .PivotItems("(blank)").Visible = True

---

Le problème est que lorsque de nouvelles dates devraient incrémenter le TCD, elle n'apparaissent pas car la macro n'active pas la tic box "Sélectionner tout" mais simplement la tic box "vide" (comme indiqué dans la macro) ce qui n'incrémente pas les nouvelles lignes (dates). Pas moyen de trouver le code VBA de cette action "Selectionner tout".

Auriez-vous une idée?

Merci d'avance,
Nicolas:lol:

:cry:
Vraiment personne n'a une piste à me proposer?
Où pourrais-trouver l'intitulé de chaque objet?
Nicolas

Salut, à consulter Les tableaux croisés dynamiques dans Excel2007

Salut
c'est quoi une tic box ?
n'est ce pas plutôt un problème de Source à l'origine de ton tcd ?

Merci Philippe. Je regarde.

Olivier, ce que j'appelle la Tic box c'est ça... Dans cet exemple l'objet dans je parle c'est "afficher tout". Dans la version 2007, c'est "selectionner tout".

http://1.bp.blogspot.com/_LxUaQO3Ivb...600/tcdyn7.PNG

Merci de votre aide.

salut
essaye :

Code:

---

ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotFields("DATE").ClearAllFilters

---

Bah ça marche!!!:ccool:

Merci beaucoup Olivier. :D