Wordでソフトリターンをハードリターンに置き換えるにはどうすればよいですか？

Author Tech Support Last modified 2025-08-26

Word文書の書式を整えるために、手動改行（ソフトリターン）を段落記号（ハードリターン）に置き換えたい場合、どのようにすればWordでソフトリターンをハードリターンに迅速に置き換えることができるでしょうか？このチュートリアルでは、ソフトリターンをハードリターンに変換するいくつかの方法をご紹介します。

検索と置換機能を使用してソフトリターンをハードリターンに置き換える

VBAコードを使用してソフトリターンをハードリターンに置き換える

Kutools for Wordを使用してソフトリターンをハードリターンに置き換える

ヒント： 段落記号（）、手動改行（）やその他の非表示の書式記号をWordで表示するには、「ホーム」タブの「表示/非表示」ボタンをクリックします。

検索と置換機能を使用してソフトリターンをハードリターンに置き換える

手動でソフトリターン（手動改行）をハードリターン（段落記号）に一つずつ置き換える代わりに、「検索と置換」機能を使用することで、より迅速かつ効率的に解決できます。

Word文書で、「ホーム」＞「置換」をクリックして「検索と置換」ウィンドウを開きます。
ヒント: または、Ctrl + Hを押して「検索と置換」ウィンドウを開きます。
「詳細設定」ボタンをクリックして「検索オプション」を展開します。
「検索する文字列」ボックスにカーソルを置き、「特殊」ドロップダウンリストから「手動改行」を選択します。
「置換後の文字列」ボックスにカーソルを置き、「特殊」ドロップダウンリストから「段落記号」を選択します。
「すべて置換」をクリックします。

Kutools for Wordを使用してソフトリターンをハードリターンに置き換える

ソフトリターン（手動改行）をハードリターン（段落記号）に変換する最も簡単な方法は、Kutools for Wordを使用することです。ワンクリックで、各改行を手動で置き換えることなく、素早く変換を完了できます。

Kutools for Word、AI 🤖を搭載し、100 以上の便利な機能を提供して作業を簡素化します。

今すぐダウンロード

文書内のすべてのソフトリターンをハードリターンに変換するには：「Kutools」＞「変換」＞「手動改行を【段落】記号に変換」をクリックします。
文書の一部からソフトリターンをハードリターンに変換するには：まず該当部分を選択し、「Kutools」＞「変換」＞「手動改行を【段落】記号に変換」をクリックします。

「手動改行を【段落】記号に変換」ユーティリティを使用すると、すべてのソフトリターンが即座にハードリターンに変換されます。

Document with soft returns converted to hard returns

Kutools for Word は、作業を効率化し、文書処理スキルを向上させる究極の Word アドインです。今すぐ入手してください！

ハードリターンをソフトリターンに置き換えたい場合は、こちらをご覧ください：replace hard returns with soft returns in Word。

VBAコードを使用してソフトリターンをハードリターンに置き換える

Office Tab: Word、Excel、PowerPointにタブインターフェースを提供します。

Navigate through documents using Office Tab

今すぐワークフローを強化しましょう。Office Tabについてさらに詳しく 無料ダウンロード

VBAコードを使用して、ソフトリターン（手動改行）をハードリターン（段落記号）に迅速に置き換えることができます。

WordでAlt + F11を押して「Microsoft Visual Basic for Applications」ウィンドウを開きます。

「挿入」＞「モジュール」をクリックし、次のVBAコードをモジュールウィンドウにコピーして貼り付けます：

Sub ReplaceMLBwithPM()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^l"
.Replacement.Text = "^p"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
.MatchFuzzy = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub