True if 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 |
Example
This example adds an oval to the active document 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.
Dim shapeCallout As Shape
With ActiveDocument.Shapes
.AddShape msoShapeOval, 180, 200, 280, 130
Set shapeCallout = .AddCallout(msoCalloutTwo, 420, 170, 170, 40)
With shapeCallout
.TextFrame.TextRange.Text = "My oval"
.Callout.Accent = msoTrue
.Callout.Border = msoFalse
End With
End With