將樣式應用於超鏈接

Question

有沒有辦法將樣式應用於超鏈接，而不選擇它？

例如，這個工程：

Sub ChangeStyle() 
    Selection.Range.Hyperlinks(1).Range.Fields(1).Result.Select 
    Selection.Style = Word.WdBuiltinStyle.wdStyleHyperlinkFollowed 
End Sub 

，但我不喜歡灰色選擇區域：

以下是我盡力去完成：

Answer 1

試試看這個：

Sub ChangeStyle() 
    Selection.Range.Hyperlinks(1).Range.Fields(1).Result.Style = Word.WdBuiltinStyle.wdStyleHyperlinkFollowed 
End Sub