共用方式為


PowerPoint) (ShapeRange.Callout 屬性

會傳回 CalloutFormat 物件含有圖說文字格式設定指定之圖案的屬性。 適用於代表直線圖說文字的 ShapeShapeRange 物件。 唯讀。

語法

運算式標注

表達 代表 ShapeRange 物件的 變數。

傳回值

CalloutFormat

範例

本範例會將橢圓形和指向橢圓形的圖說文字新增至 myDocument 。 這個圖說文字的文字雖然沒有框線,但卻有一條垂直強調線,可用來分開圖說文字和圖說文字線。

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes

    .AddShape msoShapeOval, 180, 200, 280, 130

    With .AddCallout(msoCalloutTwo, 420, 170, 170, 40)

        .TextFrame.TextRange.Text = "My oval"

        With .Callout

            .Accent = True

            .Border = False

        End With

    End With

End With

另請參閱

ShapeRange 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應