VBA Filtre Avancé Trié

Bonjour
j'utilise filtre avancé dans un userform en vba
je voudrais trier le résultat

' liste des années d'adhésions

Sheets("Adhérents").Columns("I:I").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Range("B10:C11"), CopyToRange:=Range("A10"), Unique:=True
pouvez vous m'aider
Pierre

il faudrait commencer par effacer les filtres précédents pour éviter un double filtrage et des incohérences

Code:

---

ActiveSheet.AutoFilterMode = False

---

ensuite quelque chose comme

Code:

---

1 2	Set rRange = Range("A10").CurrentRegion rRange.Sort Key1:="A1", Order1:=xlAscending, Header:=xlYes

---