エクセルで途中の文字を基準に並び替えをしたい

質問

エクセルで途中の文字を基準に並び替えをしたいのです。

たとえば、
セルＡ１に　２００４－Ｒ０５０１
セルＡ２に　２００３－Ｅ０４０３
セルＡ３に　２００１－Ｇ０３４１
という文字が入力されています。
ハイフォンの次のアルファベットを基準に昇順したいのです。昇順するとＡ２→Ａ３→Ａ１となるようにです。
こんなことは可能でしょうか？
ちなみに、関数は少しなら理解できますが、
マクロはまったく理解できません。

よろしくお願いいたします。
ちなみにエクセル２０００で、
ＯＳは９８です。

回答No.1

akio_myau · ベストアンサー

途中から指定して並べ替えの機能は無いので
Ｂ列にright(a1,5)といった形で
検索に必要な情報の列を作成して
検索を行ったらどうでしょうか。

お礼

ありがとうございました。この方法でできました。

回答No.4

imogasi

エクセルでは、ソートは列単位です。
他のソートユテリィティソフトなどではソートキーの
開始桁と文字列長さを指定できるのは当たり前ですが、
エクセルはそうではない。
そこでソートキーが入った列を別に作る必要があります。
－で分ける方法（ＭＩＤ、ＬＥＦＴ関数を使う）の別方法を記します。
１列が２列に分離させるため列挿入します。
Ａ列にソートキーを含むデータがあるとしてＢ列にカーソルを置いて挿入ー列
例えばＡ１：Ａ３を範囲指定
データ
区切り位置
「カンマや・・・」がＯＮであること確認して
次へ
（区切り位置）で「その他」にＯＮにし、ボックスに「-」
をいれる。
次へ完了
（例データ）Ａ１：Ａ３
2-345
1-234
34-345
（結果）
2 345
1 234
34 345
元のデータを残したい時は、２列挿入し、Ａ列をＢ列に複写し、Ｂ列を上記操作でＢ、Ｃ列に分離する。

お礼

なるほど、分離する方法ですね。この方法は知ってたのに思い出せませんでした。＾＾；
今回は＃１・２さんの方法でやってしまいましたが、次回参考にさせていただきます。ありがとうございました。

回答No.3

mshr1962

直接は無理なので並べ替えたい文字を抽出する必要があります。

位置が決まっているなら
=MID(A1,6,1)
で"R"が抽出できます。
位置が決まっていない場合は
=MID(A1,FIND("－",A1,1)+1,1)
で"R"が抽出できます。

この式を入力した列で並び返してください。

お礼

ありがとうございました。♯１・２さんの方法で今回は試しました。教えていただいた関数は次回役立てたいと思います。

回答No.2

SAKURAMYLOVE

右端の文字数が変わらないのであれば、Ｂ列に
Ｂ１＝RIGHT(A1,5)
Ｂ２＝RIGHT(A2,5)
・・・・・
とし、Ｂ列を昇順でソートします。

お礼

ありがとうございました。＃１さんと同じくこの方法で問題が解決しました。