我有一个 MS Word 文档,其中有几个链接未显示为链接。将鼠标悬停在文本上会显示目标 URL,如果我右键单击以编辑超链接,我可以看到超链接的 URL 和文本。但是,链接边界在文档中不可见。
我可以使用格式刷将样式从新的、样式正确的超链接复制到每个格式不正确的超链接,但这将花费很长时间,因为我的文档中有许多超链接,它们的边缘很难找到(这就是问题所在)。 我怎样才能使我的文档中的所有链接看起来像链接?
有用的信息:当我单击将光标放在其中一个链接中并打开“样式”窗格(Alt + Ctrl + Shift + S 或在“主页”选项卡中,单击“样式”右下角的箭头)时,我可以看到它们的样式是标准而不是超链接。
答案1
打开文档后,按 Alt+F11 调出 Visual Basic 编辑器窗口。
选择“插入”->“模块”调出空白代码编辑器并粘贴以下内容:
Sub ApplyHyperlinkStyleToAllLinksInDoc()
For Each link In ActiveDocument.Hyperlinks
link.Range.Style = ActiveDocument.Styles("Hyperlink")
Next
End Sub
然后突出显示此代码并按运行(或 F5)。
与任何宏一样,您应该在运行之前保存文档。
如果要自定义整个文档的超链接样式:
- 按照问题所示打开“样式”窗格。
- 将鼠标悬停在“超链接”上,这样“超链接”一词的右侧就会出现一个小的下拉箭头。
- 单击该下拉菜单并选择“修改”,以获取“修改样式”对话框。
- 更改任何所需选项(颜色、下划线等)。一些选项隐藏在左下角的下拉格式框中,可用于设置字体(包括小型大写字母等)、边框等的格式选项。
- 选择“确定”,更改将应用于所有样式为超链接的链接,如果您运行上述代码,则应该是所有链接。
您可以将代码模块保存在 Normal 中,而不是保存在特定文档中,甚至可以指定工具栏按钮或键盘快捷键(如果您希望更快地在一组文档中使用它)。您还可以更改 Normal 模板中的样式更改(如果您希望它们也应用于新文档)。