Bonjour !
Il y a quelques jours, un membre m'a aidé à finaliser mon code.
Cependant, en rajoutant un bouton d'exécution d'une macro (à côté) de création de tableau croisé dynamique, cela ne fonctionne plus...
Enfin sur mon ordi avec Excel 2013 oui mais pas en le transférant sur un autre ordi avec Excel 2010 --> erreur 1004 sur la fonction PivotCaches
Voici le code incriminé :
etc etc
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 Sheets("Recap").Select Cells.Select Selection.Delete Shift:=xlUp Range("E9").Select 'Tableaux croisés dynamiques Columns("C:D").Select ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _ "Feuil1!R1C3:R1048576C4", Version:=xlPivotTableVersion15).CreatePivotTable _ TableDestination:="Recap!R1C1", TableName:="Tableau croisé dynamique20", _ DefaultVersion:=xlPivotTableVersion15 Sheets("Recap").Select Cells(1, 1).Select ActiveWorkbook.ShowPivotTableFieldList = True With ActiveSheet.PivotTables("Tableau croisé dynamique20").PivotFields( _ "Réf papier utilisé") .Orientation = xlRowField .Position = 1 End With
J'ai découvert hier que les listes déroulantes disparaissaient d'excel 2013 à excel 2010 si les tables n'étaient pas dans le même onglet donc je pense qu'il y a également une subtilité du genre...
Merci d'avance!!!
Eléna
Partager