Discussion :

[juju05]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[david_atx]

il ne manquerait pas un espace dans ton code

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[evx136]

Bonjour

essaie comme ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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