Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
68758 / 76807 ←次へ　｜　前へ→
【12581】Re:sortを使って日本語を並び替えること...
回答  パピー（ＰＡＰＩー）  - 04/4/8(木) 8:23 -
引用なし
パスワード
   ▼ふぉれお さん：こんにちは。
>
>　　Range("A1:D4").sort. _
>　　key1:=Range("c1"), order1:=xlAscending, _
>　　key2:=Range("d1:d4"), order2:=xlAscending, _
>　　header:=xlGuess
>
Sub test()

　　Range("A1:D4").Sort _
　　key1:=Range("C1"), order1:=xlAscending, _
　　key2:=Range("D1"), order2:=xlAscending, _
　　header:=xlGuess

End Sub

このコードでご希望の結果が得られましたが？
Ｋｅｙ２のRangeを変更しただけですが。

外していたらごめんなさい。
0 hits
▼ 【12579】sortを使って日本語を並び替えることは？ ふぉれお 04/4/8(木) 1:44 質問
【12581】Re:sortを使って日本語を並び替えること... パピー（ＰＡＰＩー） 04/4/8(木) 8:23 回答≪
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
68758 / 76807 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free