Excelでキャリッジリターンをカンマに変換するにはどうすればよいですか？

おそらく、多くのセルにキャリッジリターンで区切られた値が入力されている場合があり、ここで全てのキャリッジリターンを探して、次のスクリーンショットのようにカンマやその他の文字に置き換える必要があります。ワークシート内のすべてのキャリッジリターンを迅速かつ簡単にカンマやその他の文字に変換するにはどうすればよいでしょうか？

数式を使用してキャリッジリターンをカンマに変換する

検索と置換機能を使用してキャリッジリターンをカンマに変換する

VBAコードを使用してキャリッジリターンをカンマに変換する

数式を使用してキャリッジリターンをカンマに変換する

以下のシンプルな数式を使用すると、キャリッジリターンをカンマやその他の文字に簡単に置き換えることができます。

1. データの隣にある空白セルにこの数式を入力してください：=SUBSTITUTE(A1,CHAR(10),",")（A1はキャリッジリターンを置き換えたいセルを示し、引用符内のカンマは使用したい文字です。必要に応じてこれらを変更できます）。スクリーンショットをご覧ください：

2. 次に、この数式を適用したい範囲までフィルハンドルをドラッグすると、キャリッジリターンがカンマに置き換えられた結果が得られます。

検索と置換機能を使用してキャリッジリターンをカンマに変換する

検索と置換機能もまた、一度にキャリッジリターンをカンマに変換するのに役立ちます。以下のように操作してください：

1. キャリッジリターンを変換したいデータ範囲を選択します。

2. [ホーム] → [検索と選択] → [置換] をクリックするか、Ctrl + H ショートカットキーを使用して「検索と置換」ダイアログボックスを開きます。スクリーンショットをご覧ください：

3. 「検索と置換」ダイアログボックスで、「検索内容」フィールドに Ctrl + J キーを押して、そして「置換内容」フィールドに使用したい文字を入力します。この場合、カンマ (,) を入力します。スクリーンショットをご覧ください：

4. 次に「すべて置換」ボタンをクリックすると、何件置換が行われたかを知らせるプロンプトボックスが表示されます。スクリーンショットをご覧ください：

5. その後、「OK」をクリックして「検索と置換」ダイアログを閉じると、すべてのキャリッジリターンがカンマに置き換えられます。

VBAコードを使用してキャリッジリターンをカンマに変換する

VBAコードに興味がある場合、この作業を解決するためのコードをご紹介します。

1. ALT + F11 キーを押すと、Microsoft Visual Basic for Applicationsウィンドウが開きます。

2. [挿入] → [モジュール] をクリックし、モジュールウィンドウに次のコードを貼り付けます。

VBAコード：キャリッジリターンをカンマに変換する

Sub ReplaceCarriage()
'Update 20141023
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
Rng.Value = Replace(Rng.Value, Chr(10), ",")
Next
End Sub

3. 次にF5キーを押してこのコードを実行すると、使用したいデータ範囲を選択するように促すプロンプトボックスが表示されます。スクリーンショットをご覧ください：

4. 次に「OK」をクリックすると、キャリッジリターンがすぐにカンマに変換されます。

注：

上記のコードでは、Rng.Value = Replace(Rng.Value, Chr(10), ",") スクリプト内のカンマ "," を任意の他の文字に変更できます。

関連記事：

Excelで改行を素早く削除するにはどうすればよいですか？

キャリッジリターンによってセルを複数の列または行に分割するにはどうすればよいですか？