Hyperlink.Shape (Word)

Devuelve un objeto Shape para el nodo de diagrama o hipervínculo especificado.

Si el hipervínculo no está representado por una forma, se producirá un error.

ActiveDocument.Hyperlinks(1).Shape.Fill.ForeColor.RGB = _ 
 RGB(255, 255, 0)