Excelで、セル分割をしたい

環境：Excel mac

現在、このようなデータ（３行１列）があります。

例
東京都目黒区
東京都品川区
東京都八王子市

これを、３行２列にしたいのですが、可能でしょうか？

例
東京都　目黒区
東京都　品川区
東京都　八王子市

No.9 ベストアンサー 回答者： freednia 回答日時： 2005/01/14 16:24

わお。

神奈川県および和歌山県に在住の方々、大変失礼致しました！！
申し訳ない・・・

で、＃８さんの回答を見て目からウロコです。
最初の４文字に「県」って漢字がなかったら
「都」「道」「府」とみなして３文字切る、
人間の発想ってすごいですね。

がんばってください。
ちなみにこれをマクロでやると

If InStr(Left(Cells(x,1),4),"県") = 0 Then
i=3
Else
i=InStr(Cells(x,1),"県")
End If
Cells(x,2)=Right(Cells(x,1),Len(Cells(x,1))-i)
Cells(x,1)=Left(Cells(x,1),i)

これをx=x+1でループ
こんな感じですか？

No.8 回答者： bari_saku 回答日時： 2005/01/14 11:40

セルA1に分割したい住所が入っているとして、

セルB1に
=IF(ISERROR(FIND("県",LEFT(A1,4))),3,FIND("県",A1,1))

セルC1に
=LEFT(A1,B1)

セルD1に
=RIGHT(A1,LEN(A1)-B1)

これを下の行にドラッグ。
あとは分割された2列のセルを“コピー＆形式を選択＆値で貼り付け”。
全ての都道府県名に対応してます。

この式、私もここのサイトで教わったような気が(^^;)

No.7 回答者： jindon 回答日時： 2005/01/14 10:29

jindonです。

提示した数式ですと、「京都府」が出てくるとうまくいかないので、

B1:
=IF(MID(A1,4,1)="県",LEFT(A1,4),LEFT(A1,3))

の方が簡単ですね。

No.6 回答者： jindon 回答日時： 2005/01/13 22:12

>都道府県名は漢字で記述すれば必ず3文字なので、もっと簡単になります。

神奈川県、和歌山県も考慮して下さい。

No.5 回答者： freednia 回答日時： 2005/01/13 22:08

＃４さんのようにB列とC列に出力するだけなら関数でいけます。

都道府県名は漢字で記述すれば必ず3文字なので、もっと簡単になります。

B1
=LEFT(A1,3)

C1
=MID(A1,4,100)

住所が100文字以上あることはないと思いますが、
あるなら100のところをもっと増やしてください。

マクロなら、
Cells(x,2)=Right(Cells(x,1),Len(Cells(x,1))-3)
Cells(x,1)=Left(Cells(x,1),3)
これを最終行までループかければ出来上がり。

No.4 回答者： jindon 回答日時： 2005/01/13 21:40

Macは今使用していないので、機能するかわかりませんが、

A1よりデータがあるとして

B1: 都道府県名を抽出
=LEFT(A1,FIND("都",SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"道","都"),"府","都"),"県","都"),1))

C1: 都道府県名以外の文字列を抽出
=RIGHT(A1,LEN(A1)-LEN(B1))

数式をフィルダウンして、B:C列をコピー、形式を選択して貼り付けで「値」で決定すればよいのでは？

No.3 回答者： freednia 回答日時： 2005/01/13 21:23

補足ありがとうございます。

それでは、もう少し質問。

全てのデータが都道府県名から始まっていて、都道府県名とそれ以外を分けるという解釈でいいですか？
都道府県名のみというデータもありますか？

関数よりもマクロを使ってデータそのものを変換してしまったほうがいい気がしますが、私はWindows派なのでMacのExcelでマクロが使えるかわかりません。
使えるんですか？

この回答へのお礼

windows版でかまいません。あとはこちらで解釈しますので。
マクロレベルでできるのでしょうか？
モジュールレベルまでいかれるのでしょうか？

お礼日時：2005/01/13 21:42

No.2 回答者： freednia 回答日時： 2005/01/13 20:27

3行しかないなら手作業が一番早いです。

それとももっと多くのデータがあるんでしょうか？

この回答へのお礼

すみません、説明が抜けてました。
３行は例で、実際は１００００行ほどあります。

お礼日時：2005/01/13 20:34

No.1 回答者： bari_saku 回答日時： 2005/01/13 19:03

「３行１列」とは、一つのセルの中に、このような状態で入力されている。

そして同様のセルがたくさんある、ということですか？

この回答へのお礼

すみません、説明が抜けてました。
３行は例で、実際は１００００行ほどあります。

お礼日時：2005/01/13 20:34