je parviens à déterminer le nom de l'onglet mais pas à l'insérer dans la définition de la plage.Et comment as tu essayé de le mettre ?
"mois""&!R1C1:R300C21"
Sub New_Mois() 'Copie de la zone du TBC Dim mois As Variant mois = ActiveWorkbook.ActiveSheet.Name Range("E317").Select ActiveSheet.PivotTableWizard SourceType:=xlDatabase, SourceData:= _ mois & "!R1C1:R300C21"
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question