constant indicating whether a vertical accent bar separates the callout text from the callout line. Read/write.
| MsoTriState can be one of these MsoTriState constants. |
| msoCTrue Not used with this property. |
| msoFalse A vertical accent bar does not separate the callout text from the callout line. |
| msoTriStateMixed Return value only; indicates a combination of msoTrue and msoFalse in the specified shape range. |
| msoTriStateToggle Set value only; toggles between msoTrue and msoFalse. |
| 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 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.
With ActiveDocument.Pages(1).Shapes
' Add an oval.
.AddShape Type:=msoShapeOval, _
Left:=180, Top:=200, Width:=280, Height:=130
' Add a callout.
With .AddCallout(Type:=msoCalloutTwo, _
Left:=420, Top:=170, Width:=170, Height:=40)
' Add text to the callout.
.TextFrame.TextRange.Text = "This is an oval"
' Add an accent bar to the callout.
With .Callout
.Accent = msoTrue
.Border = msoFalse
End With
End With
End With