This documentation is archived and is not being maintained.

Shape.Callout Property

Office 2007
Returns a CalloutFormat object representing the formatting of a line callout.



expression   A variable that represents a Shape object.


This example adds an oval to the active publication and a callout that points to the oval. The callout text won't have a border, but it will have a vertical accent bar that separates the text from the callout line.

Visual Basic for Applications
Sub NewShapeItem()

    Dim shpNew As Shapes

    Set shpNew = Application.ActiveDocument.MasterPages(1).Shapes
    With shpNew
        .AddShape Type:=msoShapeOval, Left:=180, _
            Top:=200, Width:=280, Height:=130
        With .AddCallout(Type:=msoCalloutTwo, Left:=420, _
            Top:=170, Width:=170, Height:=40)
            .TextFrame.TextRange = "Big Oval"
            With .Callout
                .Accent = msoTrue
                .Border = msoFalse
            End With
        End With
    End With

End Sub

See Also