VBA データの操作　データを並べ替え(Sortメソッド)

データを並べ替え

EXCELの並べ替え（ソート）は、データ分析などでは非常によく使える機能です。今日は、その基本的な使い方を紹介します。
並べ替え（Sortメソッド）は、Excel2007から大きく変わってしまいましたので、ここでは、Excel2007以降のを優先的に紹介します。

構文

Worksheet名.Sort.SortFields.Clear
Worksheet名.Sort.SortFields.Add Key:=Range(“A1”), Order:=xlDescending
Worksheet名.Sort.SetRange Range(セル範囲)
Worksheet名.Sort.Apply

Sub test()

Dim WS As Worksheet
Set WS = Sheets(1)

With WS.Sort
‘前回の設定情報を消去
.SortFields.Clear

‘並べ替えのキーを追加(C列、降順
.SortFields.Add Key:=WS.Range("C3"), Order:=xlDescending

‘並べ替えのキーを追加(A列、昇順
' .SortFields.Add Key:=WS.Range("A3"), Order:=xlAscending


‘並べ替えの範囲を設定
.SetRange WS.Range("A3:C25")

‘見出し行有無の設定（ある場合xlYes
.Header = xlNo

‘並べ替え実行
.Apply

End With

End Sub

EXCEL2003までのSortメソッド

Sub test2()
Dim WS As Worksheet
Set WS = Sheets(1)

With WS
.Range("A3:D25").Sort _
Key1:=.Range("C3"), Order1:=xlDescending, _
Header:=xlNo
End With

End Sub

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじへ戻る

VBA データの操作 データを並べ替え(Sortメソッド)

VBA データの操作　データを並べ替え(Sortメソッド)