Word で空白行を削除する方法は？

Web からドキュメントをダウンロードすると、多くの場合、空白行（手動改行）が多すぎて、ドキュメントがごちゃついて見えることがあります。こうした空白行を手動で削除するのは、時間も手間もかかります。幸いにも、ドキュメントからすべての空白行を簡単に削除する方法があります。

このチュートリアルでは、ドキュメント全体または選択範囲から空白行を一括削除するための効果的な3 つの方法をご紹介します。

検索と置換オプションを使用してすべての空白行を削除

Kutools for Word を使用してすべての空白行を削除

VBA を使用してすべての空白行を削除

---

検索と置換オプションを使用してすべての空白行を削除

Word の検索と置換機能は、よく使われる機能で、すべての空白行（)手動改行と呼ばれます）を削除する際に活用できます。検索する文字列フィールドに該当コードを入力してください。

1. 置換を実行するには、ホームタブでクリックするか、ショートカットキーCtrl + Hをご利用ください。
2. 検索と置換ダイアログボックスが表示されたら、詳細 >>ボタンをクリックしてさらに多くのオプションを表示します。次に、検索する文字列フィールドにカーソルを置き、手動改行を特殊文字ドロップダウンメニューから選択します。
3. 「^l」という文字が検索する文字列フィールドに表示されます。すべて置換をクリックすると、すべての手動改行が一括で削除できます。

---

Kutools for Word を使用してすべての空白行を削除

前述の方法では複数の手順が必要ですが、Kutools for Wordを使えば、たった1 クリックで空白行をすべて一括削除できます。

1. この機能を適用するには、Kutools > 段落 > 選択範囲のすべての空の手動改行を削除をクリックします。
2. 確認のプロンプトボックスが表示されます。「はい」をクリックしてください。
3. 「はい」をクリックすると、ドキュメント内のすべての空白行が一括で削除されます。

---

VBA を使用してすべての空白行を削除

VBA コードに慣れている場合は、マクロを使用してすべての空白行を削除することもできます。以下の手順に従ってください。

1. Alt + F11を押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。
2. クリックして挿入>標準モジュールを選択し、次の VBA コードをモジュールウィンドウにコピーします：

   Sub Deleemptylines()
   Selection.Find.ClearFormatting
   Selection.Find.Replacement.ClearFormatting
   With Selection.Find
   .Text = "^l"
   .Replacement.Text = ""
   .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

3. 「Sub の実行」ボタンをクリックして、コードを実行します。これにより、ドキュメント内のすべての手動改行が削除されます。

---