[VBA-A] Problème de communication Access-Excel

Bonjour à tous,

Voici mon problème :
J'ai une interface dans mon fichier access. Lorsque je clique sur un bouton, il ouvre un fichier Excel et y envoie toutes mes données (ce sont des tableaux croisés dynamiques). Le problème est qu'à l'ouverture du fichier, Excel n'actualise pas les données :(
J'aimerai pouvoir en VBA (sous access) parcourir toutes les feuilles de mon classeur Excel et actualiser tous les tableaux dynamiques.

Comment puis- je faire?

Voici un exemple que j'utilise sous excel pour raffraichir mon tableau croisé

Code:

---

ActiveSheet.PivotTables("Tableau croisé dynamique1").PivotCache.Refresh

---

tiens voilà pour le principe, reste à modifier la ligne Set w=...;)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Dim W As Excel.Workbook Dim s As Excel.Worksheet Dim pt As Excel.PivotTable Set W = ActiveWorkbook   For Each s In W.Worksheets For Each pt In s.PivotTables pt.PivotCache.Refresh Next Next Set W = Nothing Set s = Nothing Set pt = Nothing End Sub

---