エクセルでセル内改行の解除方法

質問

こんにちは！！お世話になります。
ここで調べてみたのですが今一理解できず質問させて頂きます。
エクセル2002を使用しています。シリーズのタイトルを番号順に記入しています。
これまで一行で書いていたものがセル内で改行されて表示されるようになりました。
セル内改行は[Alt]+[Enter]でできることは知っていますが、この逆で解除する簡単な
方法はありませんでしょうか？
あちこち検索しても何やら難しい操作ばかりのようです。
できることなら１セル毎と行或いは列単位で操作する方法があれば助かります。
何卒宜しくお願いします。

回答No.5

MarcoRossiItaly · ベストアンサー

●「改行の文字列」は削除も何もしないが表示上は改行しない方法

「セルの書式設定」の「配置」タブで「折り返して全体を表示する」のチェックを外します。

●置換により「改行の文字列」を削除または置換する方法

問題のセルを含むセル範囲を選択した状態で置換のダイアログを開き（Ctrl+H）、「検索する文字列」ボックスにカーソルがある状態で「Ctrl+J」を1回だけ押します。この際、画面の見かけは何の変化もないが、見えない何かが入力されているので、気にしません。「置換後の文字列」ボックスは未入力のままとするか、または「、」などの適当な文字を入力。最後に「すべて置換」ボタンを押します。

●問題のセル内の「タイトル」ごとにセルを分割する方法【お勧め】

問題のセルを含む「1列の」セル範囲を選択した状態で（1列ずつしか処理できません）、「データ」の「区切り位置」ウィザードを起動。「カンマやタブなどの…」を選択して「次へ」。「その他」のみにチェックを入れ、その右隣のボックスにカーソルを置いて、「Ctrl+J」を1回だけ押します。この際、画面の見かけは何の変化もないが、見えない何かが入力されているので、気にしません。下に表示されている「データのプレビュー」で縦線が適切な位置に入っていることを確認したら、「完了」ボタンを押します。

なおこの方法では、分割により右隣の何列かに新たにデータが入力されます。これによってデータが上書きされてしまうような位置に、他のデータが先に入力されている場合、ウィザードの完了時に上書きしてもよいか警告が出ます。始めからそうならないようなセルの配置にしておいてから、実行しましょう。

こうして分割した複数タイトルは1行に並んでいるはずですが、これを1列に並べたい場合は、コピーして、「形式を選択して貼り付け」で「行列を入れ替える」をチェックした上で貼り付けます。

お礼

回答くださった皆様有難うございます。
概ね同じ内容で、上手く一行にできました。皆様をベストアンサーに
と思うのですがMarcoRossiItalyさんが最も解りやすかったので差し
上げます。改めて皆様に感謝します。

回答No.4

acha51

たとえばABC　ALT+Enter　DEFと入力すると2段に表示されます
これを1段に戻すには
１．ALT+Enter　で挿入された改行（表示はされていないが）を削除します
　例では　Cの後ろにカーソルを合わせ　Delキー
　　またはDの前にカーソルを合わせ　Backキー
２．セルを選択し右クリック　→　セルの書式設定　→　配置　→　
　　折り返して全体を表示するのチェックをはずします

３．多数セルの場合
　　１．を各セルごとに実施します
　　行、列など範囲を選択して、２．を実行します

回答No.3

morito_55

セルの書式設定の「配置」で「折り返し」にチェックが入っていませんか。

回答No.2

tom04

No.1です！
URLを載せるのを忘れていました。

http://www.microsoft.com/japan/athome/magazine/ucontents/users/tips/Excel/131.aspx

何度もごめんなさいね。m(_ _)m

回答No.1

tom04

こんにちは！
置換での操作方法が↓のURLに載っています。

覗いてみてはどうでしょうか？

他の方法としてはVBAでの一例です。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面に
↓のコードをコピー＆ペーストしてマクロを実行してみてください。
（Alt＋F8キー　→　マクロ　→　マクロ実行です）

Sub 改行削除() 'この行から
Dim c As Range
For Each c In Selection
If InStr(c, vbLf) Then
c = WorksheetFunction.Substitute(c, vbLf, "")
End If
Next c
End Sub 'この行まで

※　必ず改行を削除したいセルを範囲指定した後にマクロを実行してください。

参考になりますかね？m(_ _)m