Excel VBA 入門講座 ソート Sort'セル範囲"A1:B100"ã‚’2列目をã‚ーã«ã—ã¦æ˜‡é †ã«ã‚½ãƒ¼ãƒˆ Sub SortTest() Worksheets("Sheet1").Activate Worksheets("Sheet1").Range(Cells(1, 1), Cells(100, 2)) _ .Sort Key1:=Worksheets("Sheet1").Cells(1, 2),order1:=xlAscending End Sub 'セル範囲"A1:B100"ã‚’2列目をã‚ーã«ã—ã¦é™é †ã«ã«ã‚½ãƒ¼ãƒˆ Sub SortTest() Worksheets("Sheet1").Activate Worksheets("Sheet1").Range(Cells(1, 1), Cells(100, 2)) _ .Sort Key1:=Worksheets("Sheet1").Cells(1, 2),order1:=xlDesce
{{#tags}}- {{label}}
{{/tags}}