エクセルで改行を一括で行うには？

エクセルで改行を一括で行うには？

現在、データベースの集約を行っているのですが、
過去のデータで、エクセルの行内で改行する方法がわからなかったようで、

例えば

東京　　　　　千葉　　　　　　神奈川

とうちこんで

東京
千葉
神奈川

と表示されるように打ち込まれている状態です。

当然、列の幅を変更すると、めちゃくちゃになるので
空欄を消してAlt＋Entで打ち直しているのですが、
15000件ほどあり、早くも気が遠くなってきています。

これを、一括で行う方法はないのでしょうか？

ご存知の方よろしくお願いします。

No.2 ベストアンサー 回答者： keithin 回答日時： 2010/05/13 14:41

一括というワケではありませんが手っ取り早い手としては。

Ctrl+Hで置換を出し
□□　(スペース２個）
を
Ctrl+J　（コントロールキーを押しながらＪ）
に全て置換

更に
Ctrl+Jを２回
を
Ctrl+J
に全て置換　を適当に何回か連打

すると，だいたい希望通りになってるかな，と思います。
実際のデータで「残したいスペース」の様子を見ながら，適宜工夫してやってみてください。

この回答へのお礼

ありがとうございます！
１５分ほどで作業が終了しました。

やってみたところ、
Ctrl+Jを６回をCtrl+J
５回をCtrl+J、
４回を…

とすると、さらに効率がよかったです。
ありがとうございました！！

お礼日時：2010/05/13 15:30

No.1 回答者： kybo 回答日時： 2010/05/13 14:10

隣のセルにでも下記の様に入力し、折り返して表示の書式に設定、下へコピーしてみて下さい。

=SUBSTITUTE(SUBSTITUTE(TRIM(A1),"　",CHAR(10))," ",CHAR(10))

この回答への補足

隣のセルにコピーして貼り付けてみたら、
「年」と出てきました。
数字を変えるのでしょうか

式の意味が分からないので、応用できませんでした。

補足日時：2010/05/13 15:09