Accent 属性

用户可放置垂直的强调线分开标注文字和标注线。MsoTriState 类型，可读写。

expression   必需。该表达式返回“应用于”列表中的对象之一。

示例

本示例向 myDocument 中添加椭圆和指向该椭圆的标注。该标注的文字没有边框，但用垂直的强调线分开标注文字和标注线。

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