Skip to main content

如何刪除 Word 中的所有空段落?

Author: Sun Last Modified: 2025-05-12

Word 文件中的空段落會讓文件看起來凌亂且不專業。這些不必要的空白通常是由於格式問題或從其他來源複製文字時產生的。手動刪除每個空段落可能非常繁瑣,特別是在長篇文件中。幸運的是,有一些有效的方法可以快速刪除文件中的所有空段落。

在本教程中,我們將向您展示如何在 Word 中消除這些空段落,讓您的文件更整潔、更易於閱讀。

推薦的 Word 生產力工具

Kutools for Word:整合 AI ?,超過 100 項進階功能,可節省 50% 的文檔處理時間。免費下載

Office Tab:為 Word(及其他 Office 工具)引入類似瀏覽器的標籤,簡化多文檔切換操作。免費下載


使用「查找和替換」功能刪除所有空段落

逐一刪除空段落可能很繁瑣,但 Word 的「查找和替換」功能簡化了這個過程:

  1. 點擊 [Home] > [Replace] 以打開「查找和替換」工具,或者按 [Ctrl + H] 作為快捷鍵。
  2. 點擊 [More>>] 按鈕以顯示更多選項。

    Find and Replace dialog box with More button highlighted

  3. 將游標放在「Find What」欄位中,然後從「Special」下拉菜單中選擇「Paragraph Mark」。

    Paragraph Mark selected from the Special drop-down list

  4. 選擇「Paragraph Mark」後,符號“^p”將出現在「Find What」欄位中。
  5. 再次複製符號“^p”到「Find What」欄位中,使其變為“^p^p”,然後點擊「Replace All」以刪除空段落。

注意:使用“^p”將刪除所有段落標記,可能會將文字合併成一個段落。“^p^p”則只刪除空段落,保留文字的適當分隔。

Office Tab:為 Word、Excel、PowerPoint... 帶來分頁介面
Navigate through documents using Office Tab

使用 Kutools for Word 刪除所有空段落

使用內置功能刪除 Word 中的所有空段落需要多個步驟,而宏對許多用戶來說又太過複雜。幸運的是,Kutools for Word 提供了一種快速且簡單的方法來刪除文件中的所有空段落。

Kutools for Word內建人工智慧 ?,提供超過 100 種實用功能,簡化您的工作流程。

要刪除空段落:

  • 整個文件:點擊 Kutools > 段落 > 清除選擇範圍內的所有空段落標記
  • 特定部分:首先選擇該部分,然後點擊 Kutools > 段落 > 清除選擇範圍內的所有空段落標記

    Remove All Empty Paragraph Marks in Selected Ranges option on the Kutools tab on the ribbon

點擊「清除空段落標記」後,所選範圍或整個文件中的所有空段落將被刪除。

Document with empty paragraphs

Arrow

Document with empty paragraphs removed

Kutools for Word 是終極的 Word 增益工具,能夠簡化您的工作並提升文檔處理技能。立即獲取!

使用 VBA 刪除所有空段落

如果您喜歡使用宏,以下 VBA 程式碼可以幫助您刪除 Word 文件中的所有空段落。請按照以下步驟操作:

  1. Alt + F11 打開 Microsoft Visual Basic for Applications 窗口。
  2. 點擊「Insert」標籤上的「Module」。
    Module options selected from the Insert dropdown
  3. 複製並將以下 VBA 程式碼粘貼到 模組 窗口中。
    Sub Deleemptyparagraphs()
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
    .Text = "^p^p"
    .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
  4. 點擊 執行 按鈕 Run button 或按 F5 以執行腳本。

最佳辦公效率工具

Kutools for Word - 透過超過 100 項卓越功能提升您的 Word 體驗!

🤖 Kutools AI 功能AI助手 / 即時助手 / 超級潤色(保留格式)/ 超級翻譯(保留格式)/ AI遮擋 / AI校正...

📘 文件精通拆分頁面 / 合併文檔 / 以多種格式導出選擇內容(PDF/TXT/DOC/HTML...)/ 批量轉換為 PDF...

內容編輯跨多個文件進行批量查找和替換 / 調整所有圖片大小 / 翻轉表格的行與列 / 表格轉文本...

🧹 輕鬆清理:清除多餘空格 / 分節符 / 文本框 / 超鏈接 / 更多清除工具,請前往“清除”組...

創意插入:插入千位分隔符 / 複選框 / 選項按鈕 / 二維碼 / 條形碼 / 多張圖片 / 在“插入”組中發現更多...

🔍 精確選擇:精準定位特定頁面 / 表格 / 形狀 / 標題段落 / 使用更多選擇 ”功能增強導航...

星級增強功能跳轉至任意位置 / 自動插入重複文本 / 在文檔窗口之間切換 / 11 轉換工具...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 想要試用這些功能嗎?立即下載 Kutools for Word!🚀
 

最佳辦公效率工具

Kutools for Word - 100+ Word 工具