一篇Word文档里有很多回车空格,一次性去掉空行的方法如下:
1、查找替换法。打开“编辑”菜单中的“替换”对话框,把光标定位在“查找内容”输入框中,单击“高级”按钮,选择“特殊字符”中的“段落标记”两次,在输入框中会显示“^p^p”,然后在“替换为”输入框中用上面的方法插入一个“段落标记”(一个“^p”),再按下“全部替换”按钮。这样多余的空行就会被删除。
2、程序法。用Word打开含空行的文章,依次单击“工具” →“宏” →“viSUal basic编辑器”,打开viSUal basic编辑器。双击“Project”下的“thisdocument”,打开“代码”输入窗口,将下面的代码输入进去,并保存。
SUb cutpar()
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