Note: The other languages of the website are Google-translated. Back to English

如何从Word文档中删除所有水平线?

水平线可以清楚地划分段落。 许多用户已经知道他们可以通过键入三个连字符,下划线或星号等,然后按Enter键来向文档添加水平线。 看截图:

doc删除水平线1

如何从文档中删除所有水平线? 本教程将告诉您答案。

手动一一删除所有水平线

使用VBA代码删除所有水平线

用Kutools for Word删除所有水平线


手动一一删除所有水平线

如果只想删除几条水平线,则可以按以下步骤手动删除它们:

1。 将光标放在该行上方;

2。 点击 页面边框 中的项目 页面背景 一群 设计 标签;

doc删除水平线2

3。 点击 国界 标签,点击 没有,单击“ OK。 并且所选的水平线将被立即删除。

doc删除水平线3


使用VBA代码删除所有水平线

如果要删除文档中的所有水平线,则手动删除它们很繁琐。 VBA可以使其变得更容易,请执行以下操作:

1。 按 Alt + F11 在Word中打开VBA窗口;

2。 点击 模块插页 标签,然后将代码插入 模块 窗口;

VBA代码:删除Word文档中的所有水平线:

Sub removehline()
Dim ils As Paragraph
For Each ils In ActiveDocument.Paragraphs
ils.Borders(wdBorderBottom).LineStyle =wdLineStyleNone
Next ils
End Sub

3。 点击 运行 按钮或按下 F5 直接应用VBA。 并且所有水平线均已从文档中删除。


用Kutools for Word删除所有水平线

最简单的方法是从整个文档中删除所有水平线,或者使用 Kutools for Word.

Kutools for Word : 带有超过100个方便的Word加载项,可以在60天内免费试用. 

1。 点击 库工具 > 删除水平线,请参见屏幕截图: 

2。 然后整个文档中的所有水平线将被立即删除,请参见屏幕截图:

doc删除水平线5

备注:如果要删除部分水平线,请选择范围数据,然后应用此功能。

点击下载Kutools for Word并立即免费试用!


演示:删除Word中的所有水平线

Kutools for Word:具有100多个方便的Word加载项,可以在60天内免费试用,没有限制。 立即下载并免费试用!



推荐的Word生产力工具

 

Kutools For Word-超过100种Word高级功能,节省50%的时间

  • 复杂和重复的操作可以在几秒钟内完成一次处理。
  • 跨文件夹一次将多个图像插入Word文档。
  • 将文件夹中的多个Word文件合并并合并为所需顺序。
  • 根据标题,分节符或其他条件将当前文档拆分为单独的文档。
  • 在Doc和Docx之间,Docx和PDF之间转换文件,用于常见转换和选择的工具集合等...
按评论排序
注释 (13)
还没有评分。 成为第一位评论!
该评论由网站上的主持人最小化
3个“磅符号”不会做任何事情。 3 磅标志是 £££。 这不会创建任何行。 我认为您的意思是 3 个 HASH 符号(也称为数字符号):###
该评论由网站上的主持人最小化
[quote]3“磅符号”不会做任何事情。 3 磅标志是 £££。 这不会创建任何行。 我认为您的意思是 3 个 HASH 符号(也称为数字符号):###克里斯[/quote] 是的,你是对的。 3 个 HASH 符号 + Enter
该评论由网站上的主持人最小化
我的 Word 文档是从 RoboHelp 生成的。 某处有一条水平线,而不是边界。 该文档有 1300 多页。 我一次搜索一个图形并没有找到它。 然后我使用了你的宏,它在 ils.Borders(wdBorderBottom).LineStyle = wdLineStyleNone 失败了。 我有很多很多桌子,所以我很高兴它失败了。 :eek: 我真的只是想知道水平线(不是边框)的VB脚本是什么。
该评论由网站上的主持人最小化
我的天啊! 谢谢你。 我按照指示运行了一个宏并设法删除了该行。 您是 3 个网站中唯一提出此解决方案的网站。
该评论由网站上的主持人最小化
这真太了不起了!!! 非常感谢您提供 VBA 代码。 在谷歌搜索,但你的是唯一出现的东西。
该评论由网站上的主持人最小化
手动方法不起作用,但 VBA 代码起作用。 非常好!
该评论由网站上的主持人最小化
这个页面边框的东西根本不起作用。 我搜索了文档。 横线在最后,十页前是罪魁祸首,一个罗马段落号无缘无故地潜伏在一个句子中。 当我删除它时,它删除了 10 页之外的第 10 行。 我会在这里切开并拍打臭虫。 事实上,你可以有一组从 1 到 6。然后在每一页的底部放一行。 去搞清楚。 MS Word 2007 是平台。 它们在那里,但不显示。 它们就在这条线的上方,如果您将鼠标悬停,它们会突出显示。
该评论由网站上的主持人最小化
140 Ogrady St. Fall River, MA 02720-4911 USA 如何将 3 条线变成一条线?
该评论由网站上的主持人最小化
我爱你! 我的天啊。 VBA 的东西奏效了!!!! 那条转储线快把我逼疯了。
该评论由网站上的主持人最小化
谢谢你,谢谢你,谢谢你! 我有一个多 GB 的 DOCX 文件库,它使用水平线(=== 和 ---)作为内部部分分隔符。 感谢您的提示(可能是网络上唯一的实例?)我将能够以编程方式将这些文档拆分为子文件。 再次感谢
该评论由网站上的主持人最小化
VBA 代码方法有效。 非常感谢!
该评论由网站上的主持人最小化
VBA 代码返回错误 - 编译错误:必须是第一行的第一条语句。
该评论由网站上的主持人最小化
VBA 代码为第一行返回错误“编译错误:必须是第一行语句”。 有什么想法吗?
这里还没有评论

关注我们

版权所有 © 2009 - extendoffice.com。 | 版权所有。 供电 ExtendOffice。 | 网站地图
Microsoft和Office徽标是Microsoft Corporation在美国和/或其他国家的商标或注册商标。
受Sectigo SSL保护