VBA - selection sort
Post date: May 17, 2011 9:18:14 PM
Range("A:D").Select
Selection.Sort _
Key1:=Range("a1"), Order1:=xlAscending, _
Key2:=Range("b1"), Order2:=xlAscending, _
Key3:=Range("c1"), Order3:=xlAscending, _
Header:=xlYes, OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2:=xlSortNormal
Range("a2").Select