Sorting - VBA
You can add the next column as a secondary search
Sub SortRange1()
Worksheets("Sheet1").Range("A1:C20").Sort _
Key1:=Worksheets("Sheet1").Range("A1"), _
Key2:=Worksheets("Sheet1").Range("B1")
End Sub
You'll need to put your numbers in the second column.
|