ハイパーリンクにスタイルを適用する

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