Accent Property
Allows the user to place a vertical accent bar to separate 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 = 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