Effacer TCD via Macro

Bonjour à tous,

Voilà j'ai une macro qui crée automatiquement un Tableau Croisé Dynamique, jusque là tout fonctionne comme prévu.

Mais la base de données du Tableau Croisé Dynamique est vouée à évoluer dans le temps, et le nombre de ligne renseignées avec, ce qui signifie qu'une simple mise à jour ne sera pas suffisante puisqu'elle reprendra la même plage de données, sans considérer les lignes qui ont été ajoutées à la base de données entre temps.

Ainsi, dans un soucis de simplicité, j'avais prévu qu'au lancement de la procédure, celle-ci efface le tableau croisée dynamique précédemment créé, et en créé un nouveau qui prendrait en compte toutes les lignes via une variable qui serait elle même la dernière ligne renseignée.

Mais voilà, problème, au lancement de la macro, impossible d'effacer le tableau croisé dynamique, erreur 1004 "définie par l'objet ou l'application". La procédure bloque à la ligne "ClearContents".
J'avais déjà observé cette erreur lorsqu'on essaye d'effacer un TCD manuellement, mais en sélectionnant les colonnes, cela fonctionnait finalement.
Mais via macro, ça bloque.

Auriez-vous une solution ???
Toute aide serait la bienvenue

Je précise quand même que toutes les étapes du code, testées séparément, fonctionnent, le probème se situe vraiment au moment d'effacer le TCD précédemment créé.

D'avance merci beaucoup :ccool:

Au lieu d'effacer ton TCD, nomme dynamiquement ta plage, source de donnée.

Regarde la FAQ

Oui j'en suis venu à cette conclusion en attendant une réponse, je connaissais pas toutes les fonctions du TCD et je savais pas qu'on pouvait mettre à jour la base de données, maintenant c'est fait.

Merci pour la réponse