Share via

Shape Property [Publisher 2003 VBA Language Reference]

  • Article

Returns a Shape object that represents the shape associated with a hyperlink.

expression.Shape

expression Required. An expression that returns one of the objects in the Applies To list.

Example

This example adds a hyperlink to the first shape on the first page of the active publication and then vertically flips the shape. This example assumes there is at least one shape on the first page of the active publication.

Sub FormatHyperlinkShape()
    With ActiveDocument.Pages(1).Shapes(1).Hyperlink
        .Address = "http://www.tailspintoys.com/"
        .Shape.Flip FlipCmd:=msoFlipVertical
    End With
End Sub

Applies to | Hyperlink Object