Accent Property

Syntax

expression.accent

expression – Repesents the CallOutFormat Object.

The accent property will return an integer value based on which MsoTriState Constant was assigned.

Example

Set myDocument = Worksheets(1)

With myDocument.Shapes

    .AddShape msoShapeOval, 180, 200, 280, 130

    With .AddCallout(msoCalloutTwo, 420, 170, 170, 40)

        .TextFrame.Characters.Text = "My oval"

        With .Callout

            .Accent = msoTrue

            .Border = False

        End With

    End With

End With

Result

This example adds to the first worksheet an oval 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.