Discussion :

[deuboli]

Bonjour à Tous,

Je développe actuellement un fichier Excel dans lequel J'importe dans une des feuilles des données issues d'une application de mon entreprise. Jusque là no pb!

De là, j'ai 6 TCD sur d'autres feuilles qui "moulinent" sur les données importées. Je précise que j'ai crée un premier TCD et qu'ensuite j'ai copié la feuille x fois afin d'éviter de saturer la mémoire tampon).

J'ai terminé par un interface sur une feuille avec un ComboBox qui selon la sélection met à jour l'ensemble des TCD avec une macro.

Hors là où est le pb c'est que certain TCD ne se mettent pas à jours au niveau des données. Pourtant ma plage de données est fixe et plus grande que l'import afin d'éviter de louper des lignes.

Sachant qu'après l'import j'actualise automatiquement tous les TCD

Quelqu'un a une idée?

D'avnce merci à tous

[pgz]

Bonjour.

Est-ce que les TCD qui semblent ne pas se mettre à jour :
n'ont pas les bonnes valeurs
ou n'ont pas la bonne sélection des champs de pages?

Est-ce que tu arrives à mettre à jour "à la main" ces TCD récalcitrants?

Cordilement,

PGZ

[deuboli]

Bonjour,

En fait ils se mettent à jour. Les données ne sont pas les bonnes.
Et parfois le choix est inexistant dans la liste en manuel.
C'est vrai que je force un peu les TCD cependant tous les choix que je demande sont obligatoirement présent dans les données sources.

Pourquoi parles-tu des champs de page?

Je pense que je vais refaire un essai complet en repartant des données importées et je vous tiens au courant.

Bonne nuit

[crissud]

Bonjour,

Je travaille également sur un modèle de ce genre.


J'ai une table importé de donnée extérieur que je mets en forme à l'aide d'un TCD.

En amont de mon TCD, je détermine la plage de donnée avec ce code

Code :

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

1
2
Plage = Sheets("Data").Range(Cells(2, 1), Cells(Sheets("Data").Range("A65536").End(xlUp).Row, _
                Sheets("Data").Range("IV2").End(xlToLeft).Column)).Address

Ensuite j'insère Plage dans l'entête de ma routine TCD

Code :

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

1
2
3
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
Plage).CreatePivotTable TableDestination:=Sheets("Balance_Géné").Range("A1"), TableName:= _
"Tableaucroisédynamique2"

au moins tu auras déjà une plage dynamique


par ailleurs, j'ai déjà utilisé une actualiation de tous tes TCD par une seule ligne de commande, je ne sais pas si c'est cette routine que tu utilises.

en gros quelques chose comme ça : PivotTable refresh ALL


quelqu'un pourra te donner la syntaxe exacte si il le faut