Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13598 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【2608】どなたか教えてくださいm(__)mソートに関... あみやき 03/1/7(火) 21:24 質問
【2610】Re:ふりがなを使用しない りん 03/1/7(火) 22:25 回答
【2616】Re:ふりがなを使用しない あみやき 03/1/8(水) 13:16 お礼
【2632】Re:ふりがなを使用しない りん 03/1/9(木) 10:17 回答
【4769】Re:ふりがなを使用しない あみやき 03/4/4(金) 21:03 お礼
【2608】どなたか教えてくださいm(__)mソートに関...
質問  あみやき  - 03/1/7(火) 21:24 -
引用なし
パスワード
   いつもお世話になっております。
どなたかご教授ください。

漢字をソートしたいのですが、漢字を変換するときのひらがなでソートがされているようです。

例えば「富士山」を「ふじやま」と変換した場合を1.とします。
「ふじさん」と変換した場合を2.

富士山・・・1.
富士山・・・2.
藤丸


という三つの言葉に関して昇順にソートをかけます。

富士山・・・1.
富士山・・・2.
藤丸
と、漢字のコード？かな？としてソートされたいのですが、
以下のような処理を行うと


富士山・・・2.
藤丸
富士山・・・1.
となってしまいます。
どうしたらよいのでしょうか？
どなたか教えてください。


Selection.Sort Key1:=Range("a1"), Order1:=xlAscending, Key2:=Range("b1") _
　, Order2:=xlAscending, Key3:=Range("c1"), Order3:=xlAscending, Header:= _
　　　　xlNo, MatchCase:=True
　　
【2610】Re:ふりがなを使用しない
回答  りん E-MAIL  - 03/1/7(火) 22:25 -
引用なし
パスワード
   あみやき さん、こんばんわ。

>漢字のコード？かな？としてソートされたいのですが、
>
>Selection.Sort Key1:=Range("a1"), Order1:=xlAscending, Key2:=Range("b1") _
>　, Order2:=xlAscending, Key3:=Range("c1"), Order3:=xlAscending, Header:= _
>　　　　xlNo, MatchCase:=True

「ふりがなを使う・使わない」を指定する引数が省略されています。

SortメソッドのSortMethodという名前付き引数を
　マクロの記録　SortMethod:=xlStroke
　ヘルプ(XL97) SortMethod:= xlCodePage
として、ふりがなを使わない方を指定すれば大丈夫です。

記録とヘルプで内容が違うのはよくあることなので気にしないこと（笑）
【2616】Re:ふりがなを使用しない
お礼  あみやき  - 03/1/8(水) 13:16 -
引用なし
パスワード
   りん さんこんにちわ。
>「ふりがなを使う・使わない」を指定する引数が省略されています。
>
>SortメソッドのSortMethodという名前付き引数を
>　マクロの記録　SortMethod:=xlStroke
>　ヘルプ(XL97) SortMethod:= xlCodePage
>として、ふりがなを使わない方を指定すれば大丈夫です。
>
>記録とヘルプで内容が違うのはよくあることなので気にしないこと（笑）

ありがとうございましたm(__)m
助かりました。
これは漢字が音読み順でソートされるんですか？
【2632】Re:ふりがなを使用しない
回答  りん E-MAIL  - 03/1/9(木) 10:17 -
引用なし
パスワード
   あみやき さん、こんにちわ。

>これは漢字が音読み順でソートされるんですか？

文字コードです（一部音読み）。

セルに、
　櫓（「ろ」、ロ）
　桧（「ひのき」、ヒ）
　檜（「ひのき」、第二水準）
と「」の文字で入力・変換したものを、

ふりがなを使って昇順ソートすると、
　桧（ひのき）
　檜（ひのき）
　櫓（ろ）　　　　と並びますが、

ふりがなを使わずに昇順ソートすると、
　桧（ヒ）
　櫓（ロ）
　檜（第二水準）　となります。

ふりがなを使っても、ふりがなが入っていないと下の結果になります。
漢字コードはCODEワークシート関数で確認できます。VBAではASC関数です。
【4769】Re:ふりがなを使用しない
お礼  あみやき  - 03/4/4(金) 21:03 -
引用なし
パスワード
   りん さん
こんにちわ。
お礼が遅れて申し訳ございませんが、りんさんのおかげで上手くいきました。
本当にありがとうございましたm(__)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13598 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free