[VBA Excel] Génération d'un TCD : pb sous excel 200

Bonjour,

J'ai créé sous excel 2002 une petite macro me permettant de générer automatiquement des TCD en passant en paramètre des plages de données dynamiques en utilisant :

Code:

---

1 2 3

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=plage_data) _ .CreatePivotTable TableDestination:=plage_dest _ , TableName:=nom_TCD

---

Sous excel 2002 pas de pb mais sous excel 2000 cela ne marche pas (erreur 5 argument incorrect). Cela vient, je pense, de sourcedata qui n'aime pas les données dynamiques (g testé avec une plage en "dur" et c'est ok).

Comment résoudre ça avec excel 2000? Est-ce un pb de references?

Merci d'avance

bonsoir

je n'ai pas Excel2000 pour tester mais tu peux essayer cette autre méthode

Code:

---

1 2 3 4 5 6 7 8

Sub CreerTCD() Dim Plage As Range   Set Plage = Feuil1.Range("A1:B6")   ActiveWorkbook.PivotTableWizard SourceType:=xlDatabase, _ SourceData:=Plage, TableDestination:=Feuil2.Range("A1") End Sub

---

bonne soiree
michel