Menuへ
データのソート(並べ替え)



コード
ActiveSheet.Range("B10:G100").Sort Key1:=Range("C1") _
        , Order1:=xlAscending _
        , Header:=xlGuess _
        , MatchCase:=False _
        , Orientation:=xlTopToBottom _
        , SortMethod:=xlPinYin

・Key1 (省略可能)
 並べ替える列

・Order1 (省略可能)
 xlAscending 昇順
 xlDescending 降順

・Header (省略可能)
 xlGuess 先頭行をタイトル行か自動判定
 xlNo 先頭行をタイトル行と見なさない
 xlYes 先頭行をタイトル行と見なす

・MatchCase (省略可能)
 True 大文字・小文字を区別する
 False 大文字・小文字を区別しない

・Orientation (省略可能)
 xlTopToBottom 行の並べ替え
 xlLeftToRight 列の並べ替え

・SortMethod (省略可能)
 日本語が含まれていたときの並べ替え順序
 xlPinYin 音読み順
 xlStroke 画数順

■複数指定する場合
ActiveSheet.Range("B10:G100").Sort _
         Key1:=Range("C1"), Order1:=xlAscending _
        , Key2:=Range("D1"), Order2:=xlDescending _
        , Key3:=Range("E1"), Order3:=xlAscending _
        , Header:=xlGuess _
        , MatchCase:=False _
        , Orientation:=xlTopToBottom _
        , SortMethod:=xlPinYin



Topへ