如何在 Word 中選取所有空白段落？

Author: Amanda Li Last Modified: 2025-05-12

當處理包含許多空白段落的文檔時，您可能希望刪除這些段落以避免不必要的打印浪費。在刪除之前，您需要先選取所有空白段落。本教程介紹了三種快速選取 Word 中所有空白段落的方法。

逐一手動選取所有空白段落

使用 Kutools for Word 選取所有空白段落

使用 VBA 選取所有空白段落

逐一手動選取所有空白段落

您可以手動逐一選取所有空白段落，但此方法僅適用於少量的空白段落。

點擊某個空白段落以選取它。
按住 Ctrl 鍵並繼續選取其他空白段落。

注意：如果文檔中包含大量空白段落（例如超過 100 個），請考慮使用以下方法進行更快速且高效的選取。

使用 Kutools for Word 選取所有空白段落

如果您正在尋找一種更簡單、更快捷的方式來選取 Word 中的所有空白段落，Kutools for Word 提供了一鍵解決方案。此功能讓您無需手動查找即可快速選取所有空白段落。

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

立即下載

前往 Kutools > 段落 > 選取空段落。

注意：如果您只想選取文檔特定部分中的空白段落，請先突出顯示該部分，然後再應用此工具。

有關 Kutools for Word 中「選取空段落」功能的更多詳細信息，請訪問我們的《輕鬆選取 Word 中各類段落》頁面。

使用 VBA 選取所有空白段落

您可以使用 VBA 宏來自動化選取空白段落的過程，而不是手動選取。

按下 Alt + F11 打開 Word 中的 VBA 編輯器。

點擊模組在插入標籤下，然後複製並將以下 VBA 程式碼粘貼到模組窗口中。

Sub SelectBlankParagraphs()
    Dim tempParagraph As Paragraph
    Application.ScreenUpdating = False
    ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
    For Each tempParagraph In ActiveDocument.Paragraphs
        If Len(tempParagraph.Range.Text) = 1 Then tempParagraph.Range.Editors.Add wdEditorEveryone
    Next
    ActiveDocument.SelectAllEditableRanges wdEditorEveryone
    ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
    Application.ScreenUpdating = True
End Sub