Probleme connection Access

Bonjour,
Je programme sous Excel 2003.
J'utilise des TCD qui pointent sur une BD Access. J'ai acces que en lecture seule sur cette base.
J'ai créer une macro qui me met a jour tous mes TCD:

Code:

---

1 2 3 4 5 6 7

ActiveSheet.PivotTables("TCD_WIP_TMUSA").PivotCache.Refresh ActiveSheet.PivotTables("TCD_WIP_TMC").PivotCache.Refresh ActiveSheet.PivotTables("TCD_WIP_TMB").PivotCache.Refresh ActiveSheet.PivotTables("TCD_WIP_TMA").PivotCache.Refresh ActiveSheet.PivotTables("TCD_WIP_TAA").PivotCache.Refresh ActiveSheet.PivotTables("TCD_WIP_TMUK").PivotCache.Refresh ActiveSheet.PivotTables("TCD_WIP_TSF").PivotCache.Refresh

---

Le problème est que pour chaque TCD Excel se déconnecte et se reconnecte a la BD et me demande le mot de passe à chaque fois. (ici 7 fois).
A chaque fois que un tableau a été mis à jour j'ai un message "la connection du pilote odbc a échoué" : mot de passe non valide.

Alors je dois ressaisir le mot de passe et ça repart.
Obliger de faire ça pour chaque TCD.

ça pren un tps fou, quelqu'un a t'il une idée du problème ?