在 Word VBA 中更改 URL 的文本颜色

Question

在超链接旁边显示 URL 后，将应用超链接的格式。有没有办法删除 URL 的蓝色、粗体和下划线格式。

当前格式：

我的超链接文本（www.google.ca）

预期格式

我的超链接文本（www.google.ca）

Dim oLink As Hyperlink
Dim strText As String
Dim strLink As String
For Each oLink In ActiveDocument.Hyperlinks
    Let strText = oLink.Range.Text
    Let strLink = oLink.Range.Hyperlinks(1).Address
    oLink.Range.InsertAfter " (" & strLink & ")"
Next oLink
Set oLink = Nothing

Answer 1

您可以更改自动应用的字符样式。

样式包括“超链接”和“已跟踪超链接”。默认情况下，这些样式适用于所有超链接字段。

要清楚的是，您需要更改这些样式，使它们不再具有颜色或下划线功能。同样，这些样式会自动应用于 Word 中的超链接。即使您更改文本中的颜色和下划线，一旦使用超链接，就会应用“已关注超链接”样式。