Erreur d'exécution '5'

Bonjour,

J'ai créé une macro. qui constitue une base de données sur une feuille et qui, à partir de celle-ci, construit un tableau croisé dynamique.

J'ai enregistré mon fichier sur excel2003-2007 dans la mesure où je suis le seul à avoir 2010.

Lorsque j'exécute mon code sur un autre poste, j'ai le message:

"Erreur d'exécution '5'. Argument ou appel de procedure incorrect."

Le code sur lequel il y a un problème est le suivant :

Code:

---

1 2 3 4

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _ "DONNEES!A3:P" & lig).CreatePivotTable _ TableDestination:="CONSO_DONNEES!R3C1", TableName:="MonTCDH", _ DefaultVersion:=xlPivotTableVersion10

---

il ne manquerait pas un espace dans ton code

après le createpivottable ? Essaye en mettant le premier argument à la suite.

Code:

---

1 2 3 4 5

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _ "DONNEES!A3:P" & lig).CreatePivotTable TableDestination:="CONSO_DONNEES!R3C1", _ TableName:="MonTCDH", _ DefaultVersion:=xlPivotTableVersion10

---

Bonjour

essaie comme ça

Code:

---

1 2 3 4 5

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _ "DONNEES!A3:P" & lig & ").CreatePivotTable TableDestination:="CONSO_DONNEES!R3C1", _ TableName:="MonTCDH", _ DefaultVersion:=xlPivotTableVersion10

---