Tableau croisé dynamique, paramétrage de la source

Bonjour,

J'aimerais automatiser la création de mon tableau croisés dynamique.

Sauf que mon code plante à l'initialisation de la source de donnée. Pouvez m'aider svp, je dois avoir une erreur de syntaxe.

Code:

---

1 2 3 4

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ Worksheets("DATA").Range("A1:P" & DernLigne).Address(, , xlR1C1, True), Version:=xlPivotTableVersion14).CreatePivotTable _ TableDestination:="Feuil1!R1C1", TableName:="Tableau croisé dynamique1", _ DefaultVersion:=xlPivotTableVersion14

---

Salut.

Tu as oublié de mentionner le nom de la feuille source.

Code:

---

1 2	SourceData:= _ "Data!" & Worksheets("DATA").Range("A1:P" & DernLigne).Address(, , xlR1C1, True)

---

Cela dit, il est rarement utile de créer un tcd en vba. Il est souvent plus judicieux de travailler sur un classeur modèle qui inclut déjà le(s) tableau(x) conçus dans l'environnement Excel.

De plus, tu ne dis pas ta version, mais normalement, on travaille depuis 2010 (voire 2007) de préférence avec des tableaux structurés comme source de TCD, car la mise en place et la conception du classeur sont bien plus simples, et on se contente d'apporter les données dans le tableau structuré source par macro.