Vous pouvez utiliser le code ci-dessous pour trier les données par la colonne spécifiée. Sub SortDataHeader() Range(« DataRange »).Sort Keyl:=Range(« A1 »), Orderl:=xlAscending, Header:=xlYes End Sub Notez que j’ai