Discussion :

[luko6]

Bonjour à tous

Je viens de mettre en place un code permettant la création automatique d'un TCD à plage variable, ce code fonctionne bien :

Code :

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

1
2
3
4
Dim lastrow
lastrow = Sheets("Collab").Range("B4").End(xlDown).Row
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Collab!R4C1:R" & lastrow & "C31").CreatePivotTable TableDestination:="TCD_equipe!R5C1", TableName:="Tableau croisé dynamique2"

je veux donc utiliser le meme code pour un autre TCD,
j'adapte donc le meme code

Code :

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

1
2
3
4
Dim lastrow
lastrow = Sheets("Tps détaillés").Range("B4").End(xlDown).Row
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Tps détaillés!R4C1:R" & lastrow & "C35").CreatePivotTable TableDestination:="Projet Interne!R5C1", TableName:="Tableau croisé dynamique4"

mais la j'ai une erreur d'execution 5 : argument ou appel de procédure incorrect

pouvez vous m'aider?
merci d'avance

j'ai l'impression que mon problème se situe au niveau des noms des feuilles.
comment puis-je resoudre ce problème sans changer le nom de mes feuilles?

[luko6]

J'ai du me résoudre à changer mes noms de feuille en insérant "_" entre les mots.

Merci quand même