快速删除Word 2013文档段落中的硬回车的方法

办公教程导读

收集整理了【快速删除Word 2013文档段落中的硬回车的方法】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含665字，纯文字阅读大概需要1分钟。

办公教程内容图文

图1　需要处理的文档

2、按“Alt+F11”键打开Visual Basic编辑器，在“工程资源管理器”窗格中右击需要处理文档所对应的工程，在打开的快捷菜单中选择“插入”|“模块”命令，如图2所示。

图2　选择“模块”命令

3、此时将插入一个模块，在该模块的代码窗口中输入程序代码，如图3所示。具体的程序代码如下。

图3　在“代码”窗口中输入程序代码

01 Sub Del()

02 Dim temp As Paragraph

03 For Each temp In ActiveDocument.Paragraphs

04 If VBA.Len(temp.Range)=1 Then

05 temp.Range.Delete

06 End If

07 Next

08 End Sub

4、按“F5”键执行该过程，文档中的空白段落被直接删除，如图4所示。

图4　文档中的空白段落被删除

本文已经收录至：《Office 2013应用技巧实例大全》 – Office2013高级应用篇