CanvasShapes.AddCallout 方法 (Word)

將無邊框線條圖說文字新增至繪圖畫布中。 會傳回代表圖說文字的 Shape 物件。

語法

運算式。AddCallout (Type、 Left、 Top、 Width、 Height)

需要 expression。 代表 CanvasShapes 集合的變數。

參數

名稱	必要/選用	資料類型	描述
Type	必要	MsoCallout	圖說文字類型
Left	必要	Single	圖說文字周框方塊左邊緣的位置，以 點為單位。
Top	必要	Single	圖說文字周框方塊上邊緣的位置，以 點為單位。
Width	必要	Single	圖說文字周框方塊的寬度， 以點為單位。
Height	必要	Single	圖說文字周框方塊的高度， 以點為單位。

註解

您可以使用 AddShape 方法插入更多種的圖說文字，例如氣球和雲朵。

範例

本範例會將圖說文字新增至新建立的繪圖畫布中。

Sub NewCanvasCallout() 
 Dim shpCanvas As Shape 
 
 'Add drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes.AddCanvas _ 
 (Left:=150, Top:=150, Width:=200, Height:=300) 
 
 'Add callout to the drawing canvas 
 shpCanvas.CanvasItems.AddCallout _ 
 Type:=msoCalloutTwo, Left:=100, _ 
 Top:=40, Width:=150, Height:=75 
End Sub

另請參閱

CanvasShapes 集合

支援和意見反應

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