Determines whether a vertical accent bar separates the callout text from the callout line. Read/write MsoTriState.
| MsoTriState can be one of these MsoTriState constants. |
| msoCTrue |
| msoFalse |
| msoTriStateMixed |
| msoTriStateToggle |
| msoTrue A vertical accent bar separates the callout text from the callout line. |
expression.Accent
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example adds to myDocument 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.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
.AddShape msoShapeOval, 180, 200, 280, 130
With .AddCallout(msoCalloutTwo, 420, 170, 170, 40)
.TextFrame.TextRange.Text = "My oval"
With .Callout
.Accent = msoTrue
.Border = msoFalse
End With
End With
End With