Bonjour, je souhaite faire des TCDs lancés par le code. Cf ci-dessous.
Mais j'obtiens le message suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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
Au départ j'ai enregistré une macro qui fonctionne, depuis lorsque j'ai voulu personnaliser le code et depuis cela ne marche plus.Référence non valide.
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.
Partager