Actualisation TCD via macro

  • Initiateur de la discussion Initiateur de la discussion thierry.bayard
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

T

thierry.bayard

Guest
Bonjour à toutes et tous,

Voici un nouveau problème qui me laisse pantois !!

Sur un classeur A, je souhaite actualiser un TCD dont la source est sur un autre classeur B.
Cette autre classeur peut changer. Par conséquent, son adresse et son nom doivent être saisis sur une cellule nommée "Src_RH" du classeur A.

Voici le code utilisée pour actualiser le TCD (et lancer depuis le classeur A) :
Code:
Dim Source_RH
Source_RH = "'" & Range("Src_RH") & "'!Base"
     
ActiveSheet.PivotTables("TCD_base_RH").ChangePivotCache _
    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
    Source_RH, Version:=xlPivotTableVersion14)

La macro plante avec le message suivant : "Argument ou appel de procédure incorrect"

Remarques :
- Je ne joins pas de classeur exemple pour 2 raisons :
- S'agissant d'une liaison entre 2 classeurs, c'est compliqué.
- et surtout, j'applique cette procédure sur un autre classeur à la virgule près et elle fonctionne.
- Lorsque je saisie manuellement la source dans le TCD, je peux ensuite l'actualiser sans problème.
- J'ai supprimé toutes les protections de feuilles pour être sur de ne rien bloquer.

Bref, je ne sais plus quoi regarder...

Avez-vous une idée de ce qui pourrait bloquer ?
Je continue à chercher de mon côté.

Merci d'avance pour votre aide.

Thierry
 
Re : Actualisation TCD via macro

re

j'ai trouvé d'où venait mon problème : dans ma cellule Src_RH, le chemin du fichier contenait un apostrophe, ce qui dérangeait fortement excel visiblement...

Problème résolu...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

T
Réponses
1
Affichages
2 K
Tinytoons
T
C
Réponses
23
Affichages
4 K
Charles78
C
C
Réponses
5
Affichages
2 K
Charles78
C
J
Réponses
12
Affichages
2 K
jmten92
J
P
  • Question Question
Réponses
6
Affichages
1 K
J
Réponses
4
Affichages
2 K
jmten92
J
F
Réponses
15
Affichages
5 K
FlorianQ
F
B
Réponses
4
Affichages
1 K
bool2gom
B
Retour