TCD par le code Erreur Référence non valide
Bonjour, je souhaite faire des TCDs lancés par le code. Cf ci-dessous.
Code:
1
2
3
4
5
6
7
8
9
| Sheets("Volume").Delete
Sheets.Add
ActiveSheet.Name = "Volume"
Sheets("Volume").Cells.Delete
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"retour!R6C1:R74C118", Version:=xlPivotTableVersion14).CreatePivotTable _
TableDestination:="Volume!R3C1", TableName:="", _
DefaultVersion:=xlPivotTableVersion14 |
Mais j'obtiens le message suivant :
Citation:
Référence non valide.
Au départ j'ai enregistré une macro qui fonctionne, depuis lorsque j'ai voulu personnaliser le code et depuis cela ne marche plus.
Cela fait 2 heures que je suis dessus et malgré mes différentes tentatives cela ne marche pas.
Merci d'avance de vos idées.
Cordialement.
