Hoi azertyboy,
Met de Actie "Sort " kan je je bereik laten sorteren.
bvb
Range("A1:A7").Sort Key1:=Range("A1"), Order1:=xlAscending, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
sorteert het bereik A1:A7 oplopend
groetjes