Sort a specific column (with header) in descending order

Hi Sanjhali,

Thank you for the forum question.

Yes recording sorting can be difficult to understand. I hope my code below makes sense.

The line:
Worksheets("Sheet1").Sort.SortFields.Clear

makes sure that your data is back to default and prevent other sorting from interfere your sorting.

You will of course need to change my code to your data set. In my code the range("a1:e6") will be sorted by the header (column) in A1.


Sub MySortCode()

Worksheets("Sheet1").Sort.SortFields.Clear

Range("A1:E6").Sort Key1:=Range("A1"), Header:=xlYes

End Sub




Kind regards

Jens Bonde
Microsoft Office Specialist Trainer

Tel: 0207 987 3777
STL - https://www.stl-training.co.uk
98%+ recommend us

London's leader with UK wide delivery in Microsoft Office training and management training to global brands, FTSE 100, SME's and the public sector