セルのソート

指定した範囲のセルをソートする。

指定した範囲のセルをソートをするには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

 ■実行前

 ■実行結果