返回 CalloutFormat 对象,该对象包含指定形状的标注格式属性。应用于代表线形标注的 Shape 或 ShapeRange 对象。只读。
本示例向 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 = True
.Border = False
End With
End With
End With