エクセルでセルの中の指定した文字だけ一括削除する方法

質問

例えば
旭町10番1号
旭町1番20号
宇賀浦町8-3
栄町13-8
栄町4番5号
榎本町22-14
榎本町31番9号
花園町42番15号　このようなものがＡ列に１000件くらい入ってまして。これらの番地以降をけしたいとき方法はありますか？
このようにしたいのですが。
旭町10番
旭町1番
宇賀浦町8
栄町13
栄町4番
榎本町22
榎本町31番
花園町42番

回答No.3

maron--5

◆関数ならこんな方法もありますよ
=LEFT(A1,FIND("番",SUBSTITUTE(A1,"-","番"))-(COUNTIF(A1,"*-*")>0))

回答No.2

mu2011

次の方法は如何でしょうか。
（１）編集→置換で、検索文字を番*、置換文字を番で全て置換
（２）同様に検索文字を-*、置換文字を空白で全て置換
但し、市町村名で「番」が含まれる場合、調整して下さい。

補足

返答ありがとうございます。この「＊」というのはなにをあらわしているのですか？「ー＊」もなんでしょうか？

回答No.1

mshr1962

市区町村名に番の字が含まれてる場合はエラーしますが、それ以外なら
=LEFT(SUBSTITUTE(A1,"-","番"),FIND("番",SUBSTITUTE(A1,"-","番")&"番"))