OVH Cloud OVH Cloud

Tableau Croisé Dynamique et enregistreur de macro

1 réponse
Avatar
nbarreau
Bonjour,
je suis une brêle en programmation de macro alors j'utilise
l'enregistreur de macro et je fais pas à pas les manipulations. Je
souhaite crée par une macro un TCD alors je fais les manips et lorsque
j'exécute la macro un message d'erreur m'annonce : Impossible de lire la
propriéte Pivot Tables de la classe Worksheet Dans Microsoft Visual
Basic la ligne d'erreur contient : ActiveSheet.PivotTables("Tableau
croisé dynamique2").PivotSelect "", _wlDataAndLabel, True
Qu'est ce que ça veut dire ? et comment résoudre le problème ? Si
quelqu'un trouve une solution au problème, ne vais je pas être confronté
à un autre pb 2 lignes en dessous.

Merci d'avance pour votre aide
Nico

1 réponse

Avatar
anonymousA
bonjour,

je ne peux être certain de la difficulté que tu rencontres mais mon
intuition me dit que le problème se situe sans doute du côté du nom du TCD.
En effet, Excel est bien fait et à chaque fois qu'il crée quelque chose
( 1 classeur, 1 feuille, 1 objet, 1TCD), il lui donne un nom avec une
incrémentation.
Si tu crées un TCD , Excel lui donne donc un nom . Ce nom va être
incrémenté (dans la même session)si le TCD précédent est détruit . Si tu
fais référence à un nom qui n'existe plus , VBA se plante ce qui est
normal puisque le nom n'existe plus.
Je m'interesse assez peu aux TCD par programmation, pcque honnêtement ce
truc fait déjà tellement de choses par lui-même que rajouter du VBA ,
faut en vouloir ! , mais cherches au moins de ce côté -là avant d'aller
attaquer plus loin. Je serais supris qu'on ne puisse pas sous VBA donner
un nom à un TCD puis tester si celui-ci existe avec les techniques
habituelles ( .name puis on error faire quelque chose).

A+


Bonjour,
je suis une brêle en programmation de macro alors j'utilise
l'enregistreur de macro et je fais pas à pas les manipulations. Je
souhaite crée par une macro un TCD alors je fais les manips et lorsque
j'exécute la macro un message d'erreur m'annonce : Impossible de lire la
propriéte Pivot Tables de la classe Worksheet Dans Microsoft Visual
Basic la ligne d'erreur contient : ActiveSheet.PivotTables("Tableau
croisé dynamique2").PivotSelect "", _wlDataAndLabel, True
Qu'est ce que ça veut dire ? et comment résoudre le problème ? Si
quelqu'un trouve une solution au problème, ne vais je pas être confronté
à un autre pb 2 lignes en dessous.

Merci d'avance pour votre aide
Nico