[[20080620102221]]　『番地の抜き出し』（とちゅてぃ）　ページの最後に飛ぶ

『番地の抜き出し』（とちゅてぃ）

 　
Ａ列に、町名と番地が一つのセルに入っているのデータがあります。
Ａ列のデータを二つに分けて、Ｂ列に町名、Ｃ列に番地を入れたいです。
Ｂ列とＣ列にはどのような関数を入れればいいですか？
町名の長さも、番地の桁数もハイフンのあるなしも不規則です。　　　　　　　　　　　　　　
　
　　Ａ　　　　　　　　　　Ｂ　　　　　　　　　　Ｃ
1　住所　　　　　　　　　　　　　　町名　　　　　　　　番地
2　北町100　　　　　　　　　　　　北町　　　　　　　　100
3　東西町1-2　　　　　　　　　　東西町　　　　　　　1-2
4　南南西西町3-30-33　　　　南南西西町　　　　3-30-33
5　西町2-8　　　　　　　　　　　　西町　　　　　　　　2-8
　
[エクセルのバージョン]
Excel2000
[OSのバージョン]
Windows2000,

 B2=LEFT(A2,MIN(MATCH({"1","2","3","4","5","6","7","8","9","0"},INDEX(MID(A2&"1234567890",ROW($1:$100),1),),0))-1)
 C2=MID(A2,MIN(MATCH({"1","2","3","4","5","6","7","8","9","0"},INDEX(MID(A2&"1234567890",ROW($1:$100),1),),0)),LEN(A2))
 と入力。Ctrl+Shift+Enterで数式を確定します。

 必要分下にフィルドラッグしてください。
 (ROUGE)

 B2:=LEFT(A2,MIN(FIND({0,1,2,3,4,5,6,7,8,9},ASC(A2)&1234567890))-1)
 C2:=SUBSTITUTE(A2,A2,"",1)

 で下へコピー、でどうでしょうか？

 追記
 　番地が全角で入力されることがなければB2セルのASC関数ははずしてもかまわないです。
 (独覚)

ROUGEさんへ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ありがとうございます！　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　意味もわからずそのまま入れたらできました！　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　本当にありがとうございます！　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　独覚さんへ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　同様に入力したところ、町名はできましたが、番地はできませんでした。ありがとうございます。　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（とちゅてぃ）

 とちゅてぃさん、ごめんなさい（汗

 C2:=SUBSTITUTE(A2,B2,"",1)
 でした。

 (独覚)

独覚さんへ　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　ありがとうございました！　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　できました！　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（とちゅてぃ）

コメント返信：

[ 一覧(最新更新順) ]

[[20080620102221]] 『番地の抜き出し』（とちゅてぃ） ページの最後に飛ぶ

[[20080620102221]]　『番地の抜き出し』（とちゅてぃ）　ページの最後に飛ぶ