object for the specified hyperlink or diagram node.
expression.Shape
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
If a hyperlink isn't represented by a shape, an error occurs.
Example
This example changes the fill color for the shape that represents the first hyperlink in the active document. For this example to work, the hyperlink must be represented by a shape.
ActiveDocument.Hyperlinks(1).Shape.Fill.ForeColor.RGB = _
RGB(255, 255, 0)