Bonjour,


J'obtiens l'erreur 1004 sur le code suivant :
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
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"). _ 
PivotFilters.Add Type:=xlTopCount, DataField:=ActiveSheet.PivotTables( _ 
"Tcd arret c1").PivotFields("Somme de Perte fiab"), Value1:=10
Ces 2 bouts de code proviennent de l'enregistreur de macros.

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