エクセル2007で顧客データを作っています。会社名を第1順位、個人名を第2順位にして、ユーザー設定で並べ替えを行います。どちらも、振り仮名を使い、値・昇順の設定になっています。最初、うまくいかなかったのですが、会社名の列は振り仮名を編集して、「(株)」の部分の振り仮名を削除したり、「EMM」に「イーエムエム」と仮名を振ったりしたら、日本語ローマ字混在でうまく並べ替えられました。ところが個人名の列は、振り仮名を編集しても、たとえば「根本、長谷川、坪井」と、おそらく音読みの順に並んでしまいます。あいうえお順なら「坪井、根本、長谷川」ですよね。どうしたらいいのでしょうか!!!
No.2ベストアンサー
- 回答日時:
下記は参考に・
私はわざとメモ帳に
山田
根元
秋田
近藤
来島
を入力しました。
そしてコピーし、エクセルのセルに貼り付けました。
A1:A5
山田
根元
秋田
近藤
来島
となりました。
B1に
=PHONETIC(A1)
と入れて式をB5まで複写しました。
結果
A列 B列
山田山田
根元根元
秋田秋田
近藤近藤
来島来島
ーー
そこでVBAで標準モジュールに
Sub test02()
For i = 1 To 5
Cells(i, "C") = Application.GetPhonetic(Cells(i, "A"))
Next i
End Sub
をつくり、実行しました。
結果
A列 B列 C列
山田山田ヤマダ
根元根元ネモト
秋田秋田アキタ
近藤近藤コンドウ
来島来島キジマ
C列のVBAは割合(下記事情参照)有効のようです。
=PHONETIC(A1)
は使えないケースがあることを知ってください。
入力を変えて()内で漢字を出しました。
山田(ヤナデン)
根本(コンポン)
近藤(チカフジ)
来島(クルシマ)
でメモ帳に入力して、上記VBAでやってみましたが
山田ヤマダ
根本コンポン
近藤コンドウ
来島キジマ
と、入力時の読みには影響されないものの、カナ漢字変換の逆を行くため、いつも同じではないことがわかります。
ーー
質問には、会社・指名の漢字が入力的来歴がどういうものか質問に書いてないが、書く必要があるということは、上記のことを知れば、少しは参考になるだろう。
ーー
ソートのとき「フリガナを使う」はチェックが入っていたでしょうか。
フリガナをフリガナ列へ明示して(値をだして)それでソート。
漢字のままその列を指定して「フリガナを使う」でソート。
とかある。
この回答への補足
すみません。VBAに詳しくないので、せっかく教えていただいたことがよくわかりませんが、ソートのとき「振り仮名を使う」に、チェックは入れていましたが、第2順位の個人名だけうまくいきませんでした。結局、別の列にPHONETIC関数で振り仮名を出し、それでソートしました。ありがとうございました。
補足日時:2008/01/23 06:19お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 指定月分の顧客データファイルを統合して並べ替え、所定の場所に貼り付ける 3 2022/09/10 07:55
- Excel(エクセル) 範囲指定をした中で、住所の列をユーザー設定の並べ替えをしたい 3 2022/05/15 13:51
- その他(Microsoft Office) 逆順 3 2023/08/24 09:30
- Visual Basic(VBA) 指定月分の顧客データファイルを統合して並べ替え、所定の場所に貼り付ける (再質問) 4 2022/09/14 22:51
- Excel(エクセル) Excelで漢字人名が勝手に並び変わる 2 2023/01/14 22:14
- Excel(エクセル) Googleスプレッドシートの割合の関数と円グラフの並べ替えについて 1 2022/07/22 17:31
- Excel(エクセル) Excelで漢字人名が勝手に並び変わる(続) 4 2023/03/21 21:28
- その他(ソフトウェア) Googleスプレッドシートについて 5 2022/05/07 11:46
- Excel(エクセル) オフィスをLibreOfficeからmicrosoft 2013に変えました。 1 2022/05/09 00:28
- Excel(エクセル) Excel 郵便番号順に並び変えたい 同じ番号が複数あるとき 4 2022/04/28 18:35
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
時間によってファイル名が変わ...
-
Excelで、決まった行を繰り返し...
-
【マクロ】ファイル名の変更に...
-
WPS OFFICEでの縦書きについて
-
エクセルで 例えば 伊藤と名前...
-
Aというブックの1というシート...
-
【マクロ】毎回、ファイル名が...
-
エクセルの順位別一覧表の自動...
-
Excel2013のF6キー操作について
-
エクセルの条件付き書式につい...
-
エクセルで「-0.0」と表示さ...
-
エクセル 価格表から単価を呼び...
-
シートAで横に並んだ項目→シー...
-
【Microsoft Office Excel Comp...
-
西暦や和暦の表示をyyyymmdd表...
-
Excelが固まってしまった。
-
Excel元に戻す方法を教えてくだ...
-
文字列になっている時間をVBAで...
-
【関数】スペースがいくつ入っ...
-
Excelのセルを飛ばして入力する
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
[関数得意な方]教えて下さい・...
-
Excelにてある膨大なデータを管...
-
[関数について]わかる方教えて...
-
Excel初心者です。 詳しい方、...
-
excelの不要な行の削除ができな...
-
エクセル関数に詳しい方教えて...
-
INDIRECTを使わず excelで複数...
-
[オートフィルタ]で抽出された...
-
エクセルの神よ、ご回答を! エ...
-
エクセル関数に詳しい方、教え...
-
各ページの1番上の表示について
-
Excelで写真のような表を作った...
-
エクセルで不等号記号(≠)が上に...
-
数学 Tan(θ)-1/Cos(θ)について...
-
Excel 2019 は、SPILL機能があ...
-
Excelで全角を半角にしたいので...
-
条件付き書式を教えてください
-
Excel フィルターを掛けた状態...
-
[オートフィルタ]の適用範囲の...
おすすめ情報