Discussion :

[Nico las]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Nico las]

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

[kiki29]

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

[Oliv-]

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

[Nico las]

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".



Merci de votre aide.

[Oliv-]

salut
essaye :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Nico las]

Bah ça marche!!!

Merci beaucoup Olivier.