在本文中，我们将重点介绍两种快速批量更改 Word 文档中多条下划线颜色的方法。
默认情况下，Word 中的下划线颜色设置为“自动”。 但有时可能会很单调。 所以为了使文档中的颜色设置多样化，也为了突出重要的内容，改变下划线的颜色是一个不错的选择。
在创建下划线之前更改下划线颜色很容易。 因此，在接下来的内容中，我们将重点放在修改现有下划线的颜色上。
方法 1：利用“高级查找”功能
首先和形式ost，您必须找到当前文档中的所有下划线实例。 对于这个需求，可以参考我们之前的文章： 在 Word 文档中搜索带下划线文本的 2 种快速方法
找到并选择所有下划线后，您将执行以下步骤：
您只需单击“主页”选项卡下下划线图标后面的倒三角按钮。
然后在“下划线颜色”的扩展菜单中选择你喜欢的颜色。
这是我们的视频演示：
方法二：运行Word宏
Word 宏是一个如此神奇的工具。 我们不仅可以用它来搜索所有的下划线，还可以改变它们的颜色。 而且这两个过程都可以在一个宏中完成。
首先，激活“开发人员”选项卡并单击它。
然后单击“代码”组中的“Visual Basic”。
接下来点击“正常”。
然后单击“插入”选项卡。
然后在菜单上选择“模块”。
双击新模块打开编辑空间。
现在将下面的代码粘贴到那里：
Sub ChangeUnderlineColor() Dim objDoc As Document Dim objRange As Range Set objDoc = ActiveDocument Set objRange = objDoc.Range objRange.Find.ClearFormatting With objRange.Find .Font.Underline = wdUnderlineSingle .text = "" .Replacement.text = "" . Replacement.Font.UnderlineColor = wdColorBlue .Execute Format:=True, Replace:=wdReplaceAll 以结束子结束
最后但并非最不重要的一点是，单击“运行”按钮。
笔记:
首先，代码行“.Font.Underline = wdUnderlineSingle”意味着这个宏只找到单下划线。 您可以将“wdUnderlineSingle”更改为“wdUnderlineDouble”、“wdUnderlineThick”等。更多下划线常量，您可以访问此链接： https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
其次，代码行“.Replacement.Font.UnderlineColor = wdColorBlue”表示宏会将下划线颜色更改为蓝色。 更多颜色常量，您可以访问： https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor
检索受损的 Word 数据
如今，极有可能丢失 Word 数据。 例如，米ost 您在 Word 中遇到的常见错误是屏幕冻结。 当然，你可以选择restar吨的程序。 有时，应该有您正在处理的文档的自动保存版本。 但是，我们不能排除或承担全部或部分丢失文档的可能性。 因此，我们必须想办法恢复数据。 说到这一点，一位专业人士 字修 工具是其成功的关键。
作者简介：
Vera Chen 是一位数据恢复专家 DataNumen, Inc.，它是数据恢复技术的世界领先者，包括修复工具 损坏的 xls 和 pdf 修复软件产品。 欲了解更多信息，请访问 datanumen.com