指定した範囲のセルをソートする。
指定した範囲のセルをソートをするにはSortメソッドを利用します。
Rangeの引数にセル範囲を指定することで、その範囲のセルのソートでき、引数にキーとなる列(キーは3つまで設定可能)、昇順・降順の指定、ヘッダーの有無を指定することができます。
昇順と降順の指定は引数(Order1~3)に xlAscending(昇順)、xlDescending(降順)を指定します。
1行目をヘッダとしたい場合は引数(Header)に xlYes を指定します。
●セルのソート(範囲:A~E列、キー:B列/昇順・A列/降順・E列/降順)
'******************************************************************
' ソートする(ソートキー複数設定)
'******************************************************************
Sub MainSort()
Sheets("Sheet1").Range("A:E").Sort _
Key1:=Range("B:B"), Order1:=xlAscending, _
Key2:=Range("A:A"), Order2:=xlDescending, _
Key3:=Range("E:E"), Order3:=xlDescending
End Sub■実行前

■実行結果

●セルのソート(範囲:A~E列、キー:A列/昇順、ヘッダあり)
'******************************************************************
' ソートする
'******************************************************************
Sub MainSortHeader()
Sheets("Sheet1").Range("A:E").Sort _
Key1:=Range("A:A"), _
Order1:=xlAscending, _
Header:=xlYes
End Sub■実行前

■実行結果



