为指定超链接或图表顶点返回一个 Shape 对象。
expression.Shape
expression 必需。该表达式返回“应用于”列表中的一个对象。
如果没有图形代表该超链接，则产生错误。
本示例改变图形的填充颜色，该图形代表活动文档中的第一个超链接。要使本示例能运行，必须有某个图形代表该超链接。
ActiveDocument.Hyperlinks(1).Shape.Fill.ForeColor.RGB = _ RGB(255, 255, 0)