Bonjour,
J'obtiens l'erreur 1004 sur le code suivant :Si je commente cette ligne, j'ai la même erreur sur la ligne de code suivante :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Sheets("c1").PivotTables("Tcd arret c1").PivotFields("Libelle"). _ AutoSort xlDescending, "Somme de Perte fiab", ActiveSheet.PivotTables( _ "Tcd arret c1").PivotColumnAxis.PivotLines(1), 1
Ces 2 bouts de code proviennent de l'enregistreur de macros.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Sheets("c1").PivotTables("Tcd arret c1").PivotFields("Libelle"). _ PivotFilters.Add Type:=xlTopCount, DataField:=ActiveSheet.PivotTables( _ "Tcd arret c1").PivotFields("Somme de Perte fiab"), Value1:=10
Ma première instruction sert a trier la colonne "Somme de perte fiab" dans l'ordre décroissant.
La seconde sert à afficher seulement les 10 premieres lignes du tableau.
Le nom de ma feuille et le nom du tableau sont corrects.
Avez vous déjà rencontrés ce problème ? Ou connaissez vous des autres solutions pour effectuer des tris sur un tcd et afficher seulement les 10 premières valeurs ?
Merci d'avance pour tous vos contributions
Partager