Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


23339 / 76732 ←次へ | 前へ→

【58760】Re:Sortについて
お礼  WJ  - 08/11/7(金) 13:11 -

引用なし
パスワード
   koshimizu さん、どうもありがとうございました。
無事動きました。感動です。。。

▼koshimizu さん:
>こんにちは。
>マクロの記録をしただけですが。
>
>
> Sub Macro1()
>
>  Range("A1:C5").Select
>  Selection.Sort Key1:=Range("A7"), Order1:=xlAscending, Key2:=Range("B7") _
>    , Order2:=xlDescending, Key3:=Range("C7"), Order3:=xlAscending, Header _
>    :=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom _
>    , SortMethod:=xlPinYin, DataOption1:=xlSortNormal, DataOption2:= _
>    xlSortNormal, DataOption3:=xlSortNormal
> 
>End Sub

2 hits

【58755】Sortについて WJ 08/11/7(金) 11:44 質問
【58757】Re:Sortについて koshimizu 08/11/7(金) 12:45 発言
【58760】Re:Sortについて WJ 08/11/7(金) 13:11 お礼
【58758】Re:Sortについて Jaka 08/11/7(金) 12:56 発言
【58759】Re:Sortについて WJ 08/11/7(金) 13:10 お礼

23339 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free