J
Jonas
Guest
Bonjour,
J'essaye d'automatiser le travail sur un fichier, et je bloque au niveau de l'insertion des TCD. Le nom de la feuille de donnée change selon la date, j'ai mis donc une variable Nom où sera stocké le nom de la feuille (name=worksheet.name)
et le code TCD que j'ai modifié est le suivant :
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
Nom&"!R2C3:R65536C4", Version:=xlPivotTableVersion10). _
CreatePivotTable TableDestination:="Feuil1!R3C1", TableName:= _
"Tableau croisé dynamique1", DefaultVersion:=xlPivotTableVersion10
Sauf que Excel semble ne pas apprécier ce que j'ai fais, pouvez vous m'aider. Merci d'avance.
J'essaye d'automatiser le travail sur un fichier, et je bloque au niveau de l'insertion des TCD. Le nom de la feuille de donnée change selon la date, j'ai mis donc une variable Nom où sera stocké le nom de la feuille (name=worksheet.name)
et le code TCD que j'ai modifié est le suivant :
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
Nom&"!R2C3:R65536C4", Version:=xlPivotTableVersion10). _
CreatePivotTable TableDestination:="Feuil1!R3C1", TableName:= _
"Tableau croisé dynamique1", DefaultVersion:=xlPivotTableVersion10
Sauf que Excel semble ne pas apprécier ce que j'ai fais, pouvez vous m'aider. Merci d'avance.