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

摘要

我们在使用Word文档中,有时会出现一些多余的空白段落。这样的空白段落的典型特征是其只有一个硬回车,在对文档编辑时可以通过使用“Delete”依次删除这些硬回车来删除这样的空白段落。

我们在使用Word文档中,有时会出现一些多余的空白段落。这样的空白段落的典型特征是其只有一个硬回车,在对文档编辑时可以通过使用“Delete”依次删除这些硬回车来删除这样的空白段落。实际上,通过编写简单的VBA代码可以快速实现对这类空白段落的删除,具体的方法就是在代码中对所有段落进行判断,判断其长度是否为1,如果是就删除该段落。下面介绍快速删除Word 2016文档段落中的硬回车的具体操作方法。

操作步骤

1.启动Word 2016并打开需要处理的文档,该文档中存在多余的空白段落,如图1所示。

Word2016/2013快速删除文档段落中的硬回车的方法
2.按“Alt+F11”键打开Visual Basic编辑器,在“工程资源管理器”窗格中右击需要处理文档所对应的工程,在打开的快捷菜单中选择“插入”|“模块”命令,如图2所示。

Word2016/2013快速删除文档段落中的硬回车的方法
3.此时将插入一个模块,在该模块的代码窗口中输入程序代码,如图3所示。具体的程序代码如下。

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

1
2
3
4
5
6
7
8
Sub Del()
Dim temp As Paragraph
For Each temp In ActiveDocument.Paragraphs
If VBA.Len(temp.Range)=1 Then
temp.Range.Delete
End If
Next
End Sub

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

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

  • 本文由 发表于 2015-11-0322:10:01
  • 除非特殊声明,本站文章均为原创,转载请务必保留本文链接
在Excel2016中自定义排序的方法 Excel2016教程

在Excel2016中自定义排序的方法

在Excel表格中我们可以对数据按照大小或日期、字母等方式进行排序,以便于查看。Excel排序的方式有很多比如:Excel数字排序、日期排序、大小排序、姓名排序等。本文详细介绍在E...

发表评论

匿名网友 填写信息

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: