2行目から10000行目の100列目までを、優先順位を2つ設定して昇順に並べ替えるvba
2017/05/17
2行目から10000行目の100列目までを、優先順位を2つ設定して並べ替えるvba
(優先1⇒ 29列目、優先2⇒ 1列目)
----- べんりあつめ。-----
ActiveSheet.Range(Cells(2, 1), Cells(10000, 100)) _
.Sort Key1:=ActiveSheet.Cells(1, 29), order1:=xlAscending, _
Key2:=ActiveSheet.Cells(1, 1), order2:=xlAscending
※ちなみに降順なら、xlAscendingを、xlDescendingに変更する。