Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 15/11/2011, 15h12   #1
Membre actif
 
Inscription : août 2006
Messages : 312
Détails du profil
Informations forums :
Inscription : août 2006
Messages : 312
Points : 157
Points : 157
Par défaut Comment utiliser la fonction ChangePivotCache

Bonjour a tous,

Je dois créer un fichier avec quelques tableaux croisés dynamiques. Tous les tableaux ont éxactement la meme source de données (30 colonnes x 1.000.000Lignes)
J'arrive a rafrachir le cache du premiers mais pour les suivants j'ai un message d'erreur indiquant qu'Excel n'a plus assez de ressource pour continuer.

Du coup je voulais créer une fonction ayant le protocole suivant :
Code :
1
2
3
4
public function ChgPvtDataSrcFromOthPvt(pvt2Refresh as pivottable, pvtData as pivotTable) as boolean
  pvt2Refresh.changePivotCache=pvtData. '<---- et là je ne sais pas quoi mettre!!
  ChgPvtDataSrcFromOthPvt=True
End function
J'ai recherché un peu sur le net, et j'ai trouvé ma réponse sur msdn mais pour Excel 2010... Rien pour 2007. Du coup est ce que vous avez une idée de comment faire pour utiliser cette fonction ? Ou mieux pour forcer de mettre excel sur le même cache pour toutes les pivots?

Merci pour vos réponses,

E.G
EvaristeGaloisBis est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 15/11/2011, 16h16   #2
Expert Confirmé Sénior
 
Homme Daniel
aucune
Inscription : septembre 2011
Messages : 2 004
Détails du profil
Informations personnelles :
Nom : Homme Daniel
Localisation : France, Seine et Marne (Île de France)

Informations professionnelles :
Activité : aucune

Informations forums :
Inscription : septembre 2011
Messages : 2 004
Points : 4 037
Points : 4 037
Bonjour,

Jamais utilisé pour cela. Regarde l'aide VBA à propos de CacheIndex :

Code :
1
2
Worksheets(1).PivotTables("Pivot1").CacheIndex = _
    Worksheets(1).PivotTables("Pivot2").CacheIndex
__________________
Cordialement.

Daniel

Citation:
La plus perdue de toutes les journées est celle où l'on n'a pas ri.
Chamfort
Daniel.C est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 13h22.


 
 
 
 
Partenaires

Hébergement Web