求编写WORD宏,统一所有超链接的格式如附件,各超链接的格式不一
如附件,各超链接的格式不一致。 要求运行宏后,所有超链接的格式为:蓝色+下划线。
打开VBE,插入一个模块就搞定了: Option Explicit Sub 统一超链接格式() Dim hlkTemp As Hyperlink For Each hlkTemp In ActiveDocument.Hyperlinks With hlkTemp.Range.Font .Color = wdColorBlue '蓝色 .Underline = wdUnderlineSingle '下划线 End With Next End Sub