| |
Sub sort()
Sheets("職員貼付け").Select
Range("A4:D500").sort key1:=("所属"), order1:=xlAscending, header:=xlGuess
Range("A4:D500").sort key2:=("職種"), order2:=xlAscending, header:=xlGuess
Range("A4:D500").sort key3:=("コード"), order3:=xlAscending, header:=xlGuess
End Sub
だとエラーになってしまいます。どこがいけないのでしょうか？
宜しくお願いいたします。
Keyだけとって説明します。
Key1：１番目のソートキー,Key2 ：２番目のソートキー,Key3 ：３番目のソートキー
となります。
上の構文だとKey1,Key2,Key3全てに対して毎回Sort関数を実行させようとしています。
この場合、Range("A4:D500").sort key2:=("職種"), ・・・
の部分で、じゃぁ、１番目のｿｰﾄｷｰは何なの????と言う事でエラーが生じます。
ですので、↓の様にカンマで区切って繋げて下さい。
多分うまくいくはずですよ。
Range("A4:D500").sort key1:=("所属"), order1:=xlAscending, header:=xlGuess,key2:=("職種"), order2:=xlAscending, header:=xlGuess,key3:=("コード"), order3:=xlAscending, header:=xlGuess
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
