Excel VBA 对象属性：CalloutFormat.Accent
描述：
如果标注文本和标注线之间有垂直强调线，则该属性为 True。
类型：
长整数（Long）
读写：
可读写
示例：
以下示例向工作表中添加一个椭圆和一个指向该椭圆的标注。标注文本没有边框，但使用垂直强调线分隔标注文本和标注线。
Dim myDocument As Worksheet
Set myDocument = Worksheets(1)
With myDocument.Shapes
.AddShape msoShapeOval, 180, 200, 280, 130
With .AddCallout(msoCalloutTwo, 420, 170, 40)
.TextFrame.Characters.Text = "My oval"
With .Callout
.Accent = True
.Border = False
End With
End With
End With
评论区