采用Word自带的替换功能批量删除空行
批量删除空行，采用Word自带的替换功能即可，具体操作如下：
1、在文档编辑状态按Ctrl+H，打开Word的替换对话框，在查找输入框中输入“^p^p”（无引号），在替换为对话框中输入“^p”，按“全部替换”即可。
解释：“^p”表示的是word里面的回车，连续两个“^p”表示的就是两个回车，这样表示当然就是指的有冗余的空行的时候了，毫无疑问，
将连续两个回车替换成一个，就删除了其中一个，如果这样的情况很多，在完成一次全部替换之后再多操作几次即可。
2、跟第一种情况类似，只是在查找输入框中输入的是“^l^l”。这种情况普遍出现在从网页中直接复制文字到WORD的时候，“^l”可以理解为Ctrl+Enter所实现的换行。
用宏来删除word里的空行
用宏来删除word里的空行的方法：
用Word打开含空行的文章，依次单击“工具” →“宏” →“Visual Basic编辑器”，打开Visual Basic编辑器。双击“Project”下的“ThisDocument”， 打开“代码”输入窗口，将下面的代码输入进去，并保存。
Sub DelBlank()
Dim i As Paragraph, n As Integer
Application.ScreenUpdating = False
For Each i In ActiveDocument.Paragraphs
If Len(i.Range) = 1 Then
i.Range.Delete
n = n + 1
End If
Next
MsgBox “共删除空白段落” & n & “个”
Application.ScreenUpdating = True
End Sub
代码输入完毕，单击“工具栏”中的“运行”按钮，执行这段代码。这时，会弹出一个消息窗口，告诉你一共删除了多少空行。
版权声明：本文由 Duter2016 在 2019年10月29日发表。本文采用CC BY-NC-SA 4.0许可协议，非商业转载请注明出处，不得用于商业目的。
文章题目及链接：《批量删除WORD空行的方法》
