Question

我有一个充斥着超链接的word文档。链接本身工作正常，但由于某种原因，他们中的大多数不再是蓝色！我真正想做的就是尝试找到一种方法来使用宏或其他东西来浏览文档并为每个超链接添加“超链接”样式格式。

我尝试自己编辑一些宏代码（一个更改所有链接URL的代码），但我一直在让问题变得更糟！我曾经擅长VBScript，但从那时起它已经很久了。

任何不涉及手动更改每种风格的简单解决方案？

作为旁注，由于某种原因，所有这些都是“正常”风格。

Answer 1

尝试执行此VBA脚本（最好使用F8键进行调试模式 - 将VBA和Word窗口并排放置，以便您可以看到正在发生的事情）：

Sub FormatLinks()
Dim H As Hyperlink

    For Each H In ActiveDocument.Hyperlinks
        H.Range.Select                                      ' (A)
        Selection.ClearFormatting                           ' (B)

        H.Range.Style = ActiveDocument.Styles("Hyperlink")  ' (C)
    Next H
End Sub

这将

循环浏览文档（A）中的所有超链接
删除基础文字（B）和
将不相关的文本分配给样式“超链接”（C）

（C）并不是绝对必要的，因为（B）应该已经清理了你的文档，但最好将超链接真正分配给样式“超链接”，因为你可能想稍后更改样式。

编辑Word文档中所有超链接的样式

1 个答案: