[Besoin d'aide] Erreur d'exécution '9' [Résolu/Fermé]

Signaler
-
 Ereip -
Bonjour,

J'ai un classeur Excel avec deux feuilles : 'Bilan' et 'Liste'

J'ai fait une macro qui classe ma 'Liste' dans un certain ordre :

Dans 'Module1' :

Sub Tri_par_Cote()
Range("A2:N1048576").Select
ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Add Key:=Range("N2"), _
SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Feuil1").Sort
.SetRange Range("A2:N36")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Cette macro fonctionnait avant que je ne crée ma feuille 'Bilan'.

Ensuite, pour que ma macro soit activée à l'affichage de ma feuille :

Dans 'Feuil1 (Liste)' :

Private Sub Worksheet_Activate()
Tri_par_Cote
ActiveCell.Select
End Sub

A présent, quand j'affiche ma feuille (et donc que j'active ma macro), on me dit :

Erreur d'exécution '9' :
L'indice n'appartient pas à la sélection.

J'espère que quelqu'un pourra m'aider...
D'avance merci.

Cordialement.

Pierre

2 réponses

Messages postés
1941
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
23 août 2020
138
Bonjour,

Remplacer Feuil1 par Liste dans la macro Tri_par_Cote ??

A+
Suis-je bête...
Merci beaucoup :)