在处理文档时，删除空行是一个常见的需求，尤其是在整理从网页或其他来源复制的文本时。WPS Office提供了多种方法来快速删除文档中的空行，以下是一些实用的步骤和技巧：

方法一：使用查找和替换功能

1. 打开WPS文档。
2. 按下 Ctrl + H 快捷键打开“查找和替换”对话框。
3. 在“查找内容”框中输入 ^p^p（表示两个连续的段落标记，即两个空行）。
4. 在“替换为”框中输入 ^p（表示一个段落标记，即一个空行）。
5. 点击“全部替换”按钮。

这个方法会将文档中的所有连续两个空行合并为一个空行。如果需要删除所有空行，只需将“查找内容”设置为 ^p，然后在“替换为”框中留空，点击“全部替换”。

方法二：使用段落格式刷

1. 选中包含空行的文本。
2. 在“开始”选项卡中找到“段落”分组。
3. 点击“段落格式刷”按钮。
4. 在文档中点击你希望应用格式的段落。

这个方法适用于你想要将一个没有空行的段落格式应用到其他段落，从而间接删除空行。

方法三：使用宏（VBA）

对于需要重复删除空行的情况，可以使用VBA宏来自动化这一过程。

1. 按下 Alt + F11 打开VBA编辑器。
2. 在“项目”窗口中，右键点击“VBAProject (你的文档名)”。
3. 选择“插入” -> “模块”。
4. 在新模块窗口中输入以下代码：

Sub DeleteEmptyLines()
    Dim rng As Range
    With Selection
        Set rng = .Range
    End With
    Do
        rng.Find.ClearFormatting
        rng.Find.Replacement.ClearFormatting
        With rng.Find
            .Text = ""
            .Replacement.Text = ""
            .Forward = True
            .Wrap = wdFindContinue
            .Format = False
            .MatchCase = False
            .MatchWholeWord = False
            .MatchWildcards = False
            .MatchSoundsLike = False
            .MatchAllWordForms = False
        End With
        rng.Find.Execute Replace:=wdReplaceAll
    Loop While rng.Find.Found
End Sub

1. 按下 F5 运行宏或关闭VBA编辑器，回到WPS文档中，按下 Alt + F8，选择刚才创建的宏并运行。

方法四：手动删除

如果空行不多，你可以直接手动删除：

1. 打开WPS文档。
2. 使用鼠标或键盘方向键选择空行。
3. 按下 Delete 键删除选中的空行。

结论

删除WPS文档中的空行可以通过多种方法实现，包括使用查找和替换功能、段落格式刷、VBA宏或手动删除。选择哪种方法取决于你的具体需求和文档的大小。对于大量文本，自动化工具如查找和替换或宏会更加高效。对于少量空行，手动删除可能更简单快捷。在使用VBA宏时，请确保你了解代码的作用，避免对文档造成不必要的修改。

AI办公助手：WPS灵犀

如果本文未能解决您的问题，或者您在办公领域有更多疑问，我们推荐您尝试 WPS灵犀 —— 一款强大的人工智能办公助手。

WPS灵犀 具备AI搜索、读文档、快速创作、生成PPT、长文写作、网页摘要、截图问答、上传文件等功能快来体验吧