文字列末尾についている数字を削除する２
先ほど締め切ったのですが、
大変申し訳ありません、再質問をさせてください。
（初質問の上に不手際続きで本当に申し訳ありません）
前回質問
http://oshiete1.goo.ne.jp/kotaeru.php3?q=2333617
カタカナ濁音がある場合に、
=LEFT(A1,MIN(FIND({0,1,2,3,4,5,6,7,8,9},ASC(A1)&1234567890))-1)
を使うとうまくいかず、
=IF(AND(RIGHT(A1,3)>="100",RIGHT(A1,2)<="999"),LEFT(A1,LEN(A1)-3),IF(AND(RIGHT(A1,2)>="10",RIGHT(A1,2)<="99"),LEFT(A1,LEN(A1)-2),IF(AND(RIGHT(A1,1)>="0",RIGHT(A1,1)<="9"),LEFT(A1,LEN(A1)-1),A1)))
でなんとかうまくいったものの、
内容が汎用的ではなく、もう一案いただきたく
=JIS(LEFT(ASC(A1),FIND({1,2,3,4,5,6,7,8,9,0},ASC(A1)&"1234567890")-1))
をテストデータでやったところうまくいったので
締め切らせていただいたのですが、
本ちゃんデータで走らせて見たところ、
コードの最左数値が１以外のものではうまくいきませんでした。
つまり
カブ１ カブ
カブ１０ カブ
カブ１００ カブ
カブ２ カブ２
カブ２０ カブ２０
カブ２００ カブ２００
もう少しお知恵をいただけるとうれしいです。
ずうずうしくて大変申し訳ありません
