OVH Cloud OVH Cloud

ligne code TCD

3 réponses
Avatar
JEAN
Bonjour,

Je voudrai que mon TCD se mette a jour suivant les valeurs du tableau, etant
donnée que quand j'appuie sur lebouton de commande je veux ecraser les
valeurs que j'avait precedemment sur mon tcd

mmon code du bouton de commande est:


ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Feuil1!R6C2:R16C6").CreatePivotTable TableDestination:= _
"[Classeur1]Feuil3!R16C5", TableName:="Tableau croisé dynamique2", _
DefaultVersion:=xlPivotTableVersion10

j'ai mon tableau sur la feuille 1 et je cree mon tcd sur la feuille 3
et quand j'appuie sur le bouton de commande de la feuille 1 je veux pouvoir
suivant les valeurs du tableau de ma feuille 1 passer à la feuille 3 sur mon
tcd et mettre à jour les valeurs sans creer d'autre TCD, toujours en mettant
a jours le tcd de ma feuille 3

mais moi ca me genere une erreur de code vba

avez vous une solution.

merci de votre aide

3 réponses

Avatar
jmb
a tu essayé ceci

Sheets("feuil3").Select
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
Sheets("feuil1").Select

--
JMB


"JEAN" a écrit dans le message de news:

Bonjour,

Je voudrai que mon TCD se mette a jour suivant les valeurs du tableau,
etant
donnée que quand j'appuie sur lebouton de commande je veux ecraser les
valeurs que j'avait precedemment sur mon tcd

mmon code du bouton de commande est:


ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Feuil1!R6C2:R16C6").CreatePivotTable TableDestination:= _
"[Classeur1]Feuil3!R16C5", TableName:="Tableau croisé dynamique2",
_
DefaultVersion:=xlPivotTableVersion10

j'ai mon tableau sur la feuille 1 et je cree mon tcd sur la feuille 3
et quand j'appuie sur le bouton de commande de la feuille 1 je veux
pouvoir
suivant les valeurs du tableau de ma feuille 1 passer à la feuille 3 sur
mon
tcd et mettre à jour les valeurs sans creer d'autre TCD, toujours en
mettant
a jours le tcd de ma feuille 3

mais moi ca me genere une erreur de code vba

avez vous une solution.

merci de votre aide



Avatar
JEAN
avec cette ligne j'ai le message, tableaux croisé dynamique noon valide

que faire?


merci




a tu essayé ceci

Sheets("feuil3").Select
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
Sheets("feuil1").Select

--
JMB


"JEAN" a écrit dans le message de news:

Bonjour,

Je voudrai que mon TCD se mette a jour suivant les valeurs du tableau,
etant
donnée que quand j'appuie sur lebouton de commande je veux ecraser les
valeurs que j'avait precedemment sur mon tcd

mmon code du bouton de commande est:


ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Feuil1!R6C2:R16C6").CreatePivotTable TableDestination:= _
"[Classeur1]Feuil3!R16C5", TableName:="Tableau croisé dynamique2",
_
DefaultVersion:=xlPivotTableVersion10

j'ai mon tableau sur la feuille 1 et je cree mon tcd sur la feuille 3
et quand j'appuie sur le bouton de commande de la feuille 1 je veux
pouvoir
suivant les valeurs du tableau de ma feuille 1 passer à la feuille 3 sur
mon
tcd et mettre à jour les valeurs sans creer d'autre TCD, toujours en
mettant
a jours le tcd de ma feuille 3

mais moi ca me genere une erreur de code vba

avez vous une solution.

merci de votre aide








Avatar
jmb
verifie le nom de ta tcd deja crée
et met ce nom dans ta macro

--
JMB

"JEAN" a écrit dans le message de news:

avec cette ligne j'ai le message, tableaux croisé dynamique noon valide

que faire?


merci




a tu essayé ceci

Sheets("feuil3").Select
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
Sheets("feuil1").Select

--
JMB


"JEAN" a écrit dans le message de news:

Bonjour,

Je voudrai que mon TCD se mette a jour suivant les valeurs du tableau,
etant
donnée que quand j'appuie sur lebouton de commande je veux ecraser les
valeurs que j'avait precedemment sur mon tcd

mmon code du bouton de commande est:


ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=
_
"Feuil1!R6C2:R16C6").CreatePivotTable TableDestination:= _
"[Classeur1]Feuil3!R16C5", TableName:="Tableau croisé
dynamique2",
_
DefaultVersion:=xlPivotTableVersion10

j'ai mon tableau sur la feuille 1 et je cree mon tcd sur la feuille 3
et quand j'appuie sur le bouton de commande de la feuille 1 je veux
pouvoir
suivant les valeurs du tableau de ma feuille 1 passer à la feuille 3
sur
mon
tcd et mettre à jour les valeurs sans creer d'autre TCD, toujours en
mettant
a jours le tcd de ma feuille 3

mais moi ca me genere une erreur de code vba

avez vous une solution.

merci de votre aide