Discussion :

[Tibou(c)]

Bonjour,
J'utilise excel 2007.
J'ai deux feuilles de calcul, l'une avec des donnes sources, l'autre avec un tableau croisé dynamique qui les lit. Les données du TCD sont ensuite relues par des formules simples dans d'autres feuilles.
Je souhaite que dès que je modifie une valeur dans les mes données sources, le tableau dynamique s'actualise tout seul, sans cliquer droit sur actualiser. Ceci permettrait :
- que mes résultats dans les autres feuilles soient à jour dès que je modifie une valeur dans les donnes sources.
- de masquer la feuille avec le TCD car les utilisateur du fichier sont totalement novices

J'ai bien vu de-ci de-là des macro sur le forum mais je ne comprends rien a la programmation des macros. N'y-a-t-il pas une option quelque part qui le permette ?

J'espère avoir été clair.
Merci d'avance.

[casefayere]

Bonsoir,

Dans l'évenement change de ta feuille :

Code :

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

ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotCache.Refresh

ça devrait marcher

a +

[Godzestla]

Salut,

J'ai bien vu de-ci de-là des macro sur le forum mais je ne comprends rien a la programmation des macros. N'y-a-t-il pas une option quelque part qui le permette ?

pour confimer CaseFayere, il va falloir apprendre très vite les macros alors, car sinon sans clic droit, nada.

[Tibou(c)]

Merci de vos réponses.
Je progresse à pas de géant, j'ai déjà, reussi a ouvrir les macros.....

Donc dans la fenêtre macro de la feuille qui contient les données, à "worksheet" "change" j'ai donc cela

Code :

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

1
2
3
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.PivotTables("Tableau croisé dynamique2").PivotCache.Refresh
End Sub

Et quand je change les données dans ma feuille il m'insulte et me dit :

Code :

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

1
2
Erreur d'exécution '1004'
Impossible de lire la propriété PivotTables de la classe Worksheet

J'ai bouletté ou ?
Merci à vous.

[casefayere]

es-tu sur du nom de ton TD

"Tableau croisé dynamique2"

[Tibou(c)]

oui....

[casefayere]

ton TD est sur une autre feuille

alors

Code :

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

sheets("feuil2").PivotTables("Tableau croisé dynamique2").PivotCache.Refresh

[Tibou(c)]

Merci.

En fait ta première proposition marchant dans la propriété Activate, j'ai changé mon fusil d'épaule dans la construction de mon fichier.

Je vais quand même essayer ta seconde solution.

On peut passer le topic en résolu.

Merci