Shape Property

Microsoft Publisher Visual Basic

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