[VBA-E]actualisation d'un tableau dynamique par macro

Bonjour,

j'ai un petit soucis :mrgreen: donc je viens vous voir car la je n'y comprend rien du soucis :?
Voila j'ai 2 tableaux dynamiques sur une feuille et je voudrais les actualiser par macro. J'ai donc regardé et fait une macro à l'aide de l'assistant et il m'a donné cette macro :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Macro3() ' ' Macro3 Macro ' Macro enregistrée le 18/04/2006 par fkurtz ' ' Range("A20").Select ActiveSheet.PivotTables("Tableau croisé dynamique2").RefreshTable Range("D11").Select ActiveSheet.PivotTables("Tableau croisé dynamique1").RefreshTable End Sub

---

Je me dit alors à ce moment bon ben c'est cool ça marche :D hé bé nan :cry:
Le problème est que lorsque ce bout de code je l'implémente dans mon autre macro ça marche pas, quand je lance en faisant un Call dans ma macro ça ne marche pas non plus, et quand je la lance toute seule sans rien, ça marche pas non plus :?
Il me fait cette erreur :

Code:

---

1 2	erreur 1004 : impossible de lire la propriété PivotTables de la classe Worksheet.

---

Manquerait-il une référence ? c'est bizarre qu'elle ne marche pas étant donné que c'est l'assistant qui me l'a créée :?

Merci beaucoup pour vos réponses :oops: :)

et dans la nouvelle feuille active excel ... il y as bien 2 tableau croisé dynamique ? avec les noms :
"Tableau croisé dynamique2"
et
"Tableau croisé dynamique1"
;)

8O
ALors je répète : la macro je l'ai effectuée à l'aide de l'assistant, c'est a dire que j'ai fait outils > macros> nouvelle macro et j'ai fait stop après avoir actualisé le tableau pour voir ce que ça a donné, ce qui veux dire que les lignes qu'il y a écrit au dessus c'est l'assistant qui l'a écrit pas moi...Donc normalement ça devrait être bon..
Bon j'ai vérifié quand meme mais les tableaux existent bel et bien..

Citation:

---

Envoyé par illight

8O
ALors je répète : la macro je l'ai effectuée à l'aide de l'assistant, c'est a dire que j'ai fait outils > macros> nouvelle macro et j'ai fait stop après avoir actualisé le tableau pour voir ce que ça a donné, ce qui veux dire que les lignes qu'il y a écrit au dessus c'est l'assistant qui l'a écrit pas moi...Donc normalement ça devrait être bon..
Bon j'ai vérifié quand meme mais les tableaux existent bel et bien..

---

ben non ...? une macro recopie bêtement tes instructions ... ainsi si pour aller bosser tous les matins tu commence par tourner à droite puis à gauche, le jour ou tu part de chez ta maitresse si tu lance la même macro tu va commencer à tourner à droite puis à gauche.... mais tu ne vas pas arriver au boulot .. :lol: :lol:

donc les conditions initiales doivent être compatibles...

Tu as essayé de remplacer ActiveSheet par le nom de la feuille?

feuil1, feuil2 ou peu importe ce que tu as dans la propriété name de la feuille qui contient les graphes...

Code:

---

1 2 3 4 5 6 7 8 9

Sub Macro3() ' ' Macro3 Macro ' Macro enregistrée le 18/04/2006 par fkurtz ' ' feuil1.PivotTables("Tableau croisé dynamique2").RefreshTable feuil1.PivotTables("Tableau croisé dynamique1").RefreshTable End Sub

---

Citation:

---

Envoyé par bbil

ben non ...? une macro recopie bêtement tes instructions ... ainsi si pour aller bosser tous les matins tu commence par tourner à droite puis à gauche, le jour ou tu part de chez ta maitresse si tu lance la même macro tu ca commencer à tourner à droite puis à gauche.... mais tu ne vas pas arriver au boulot .. :lol: :lol:

donc les conditions initiales doivent être compatibles...

---

Justement il recopie betement les instructions que je lui est donné en allant sur le bon tableau, et en allant sur la bonne feuille, donc ça va etre dur de se tromper...
Après si tu as un e maitresse c'est pas mon soucis :mrgreen:



Pour l'autre solution un peu plus valable ça marche :) merci beaucoup :) j'avais fait ma burne encore une fois :mrgreen: merci :)

Citation:

---

Envoyé par illight

Justement il recopie betement les instructions que je lui est donné en allant sur le bon tableau, et en allant sur la bonne feuille, donc ça va etre dur de se tromper...
Après si tu as un e maitresse c'est pas mon soucis :mrgreen:

---

?? et ou il est le morceau de code ou tu vas dans la bon tableau de la bonne feuille dans ton code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Sub Macro3() ' ' Macro3 Macro ' Macro enregistrée le 18/04/2006 par fkurtz ' ' Range("A20").Select ActiveSheet.PivotTables("Tableau croisé dynamique2").RefreshTable Range("D11").Select ActiveSheet.PivotTables("Tableau croisé dynamique1").RefreshTable End Sub

---