Word中清除空行的方法有三：一、用查找替换将^p^p替换为^p反复执行；二、用通配符^13[ ^t^13]{1,}^13替换为^p彻底清理；三、运行VBA宏DeleteEmptyParagraphs批量删除空白段落。
如果您在Word文档中看到大量空行，通常是由于段落标记（回车符）连续出现所致。这些回车符不仅影响排版整洁度，还可能干扰后续编辑与格式统一。以下是解决此问题的步骤：
一、使用查找替换功能清除连续回车符
Word内置的“查找和替换”支持通配符与特殊字符匹配，可精准定位并删除多个连续段落标记。该方法无需安装插件，适用于所有版本Word（含Microsoft 365、Word 2019及更高版本）。
1、按 Ctrl + H 打开“查找和替换”对话框。
2、点击“更多”按钮，勾选“使用通配符”选项。
3、在“查找内容”框中输入：^p^p（表示两个连续段落标记）。
4、在“替换为”框中输入：^p（单个段落标记）。
5、点击“全部替换”，重复执行直至提示“Word已完成对文档的全部查找和替换”。
6、再次将查找内容设为：^p^p，继续替换，确保所有多余空行被压缩为单行。
二、一次性清除所有空行（含首尾冗余回车）
当文档开头或结尾存在大量空白段落，或中间夹杂多个空段落时，可借助通配符正则逻辑匹配“段落标记+任意空白+段落标记”的组合，实现更彻底清理。
1、打开“查找和替换”对话框（Ctrl + H）。
2、勾选“使用通配符”。
3、在“查找内容”框中输入：^13[ ^t^13]{1,}^13（其中^13代表段落标记，[ ^t^13]匹配空格、制表符或回车，{1,}表示至少一个）。
4、在“替换为”框中输入：^p。
5、点击“全部替换”，系统将自动合并所有含空白字符的相邻段落标记为单个段落标记。
三、利用宏命令批量删除空段落
对于频繁处理多份含空行文档的用户，录制或粘贴VBA宏可实现一键清除。该方法可跳过交互式替换，直接遍历全文档段落对象，判断是否为空白段落并删除。
1、按 Alt + F11 打开VBA编辑器。
2、在左侧“Normal”项目下右键 → “插入” → “模块”。
3、在右侧代码窗口中粘贴以下代码：
Sub DeleteEmptyParagraphs()
Dim para As Paragraph
For i = ActiveDocument.Paragraphs.Count To 1 Step -1
Set para = ActiveDocument.Paragraphs(i)
If Trim(para.Range.Text) = vbCr Then para.Range.Delete
Next i
End Sub
4、关闭VBA编辑器，返回Word，按 Alt + F8，选择“DeleteEmptyParagraphs”，点击“运行”。
