Publisher) (CalloutFormat.AutoAttach 屬性

傳回或設定 MsoTriState 常數,指出註標線附加至註標文字方塊的位置是否會變更,取決於註標線的原點 (註標指向) 位置是在註標文字方塊的左側或右側。 讀取/寫入。

語法

運算式。自動附加

運算式 代表 CalloutFormat 物件的變數。

傳回值

MsoTriState

註解

AutoAttach 屬性值可以是 Microsoft Office 類型程式庫中所宣告的 MsoTriState 常數之一。

當此屬性的值為 msoTrue 時,放置值 (圖說文字方塊的邊緣其中圖說文字線將附加的垂直距離) 是從文字方塊的頂端測量時文字] 方塊右邊的原點而言,且它從測量的文字方塊的底部左邊的原點] 文字方塊中時。

當此屬性的值為 msoFalse 時,放置值是一律測量從頂端的文字方塊中,無論文字方塊與原點相對位置。 使用 CustomDrop 方法可設定放置值,並使用 Drop 屬性來傳回距離值。

設定此屬性只會在註標具有明確設定的放置值時,也就是 DropType 屬性的值為 msoCalloutDropCustom 時,才會影響註標。 在預設情況下,建立圖說文字時就已明確設定垂直距離值。

範例

此範例會在第一頁新增兩個圖說文字。 其中一個註標會自動附加,而另一個則不會。 如果您變更自動附加之圖說文字方塊右側的圖說文字線原點,則文字方塊的位置會變更。 未自動附加的註標不會顯示此行為。

With ActivePublication.Pages(1).Shapes 
 With .AddCallout(Type:=msoCalloutTwo, _ 
 Left:=420, Top:=170, Width:=200, Height:=50) 
 .TextFrame.TextRange.Text = "auto-attached" 
 .Callout.AutoAttach = msoTrue 
 End With 
 With .AddCallout(Type:=msoCalloutTwo, _ 
 Left:=420, Top:=350, Width:=200, Height:=50) 
 .TextFrame.TextRange.Text = "not auto-attached" 
 .Callout.AutoAttach = msoFalse 
 End With 
End With 

支援和意見反應

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