Publisher) (CalloutFormat.AutoAttach 屬性
會傳回或設定 MsoTriState 常數,指出圖說文字線附加至圖說文字方塊的位置是否會根據圖說文字線的原點 (圖說文字線的原點) 圖說文字方塊的左邊或右邊而變更。 讀取/寫入。
語法
運算式。AutoAttach
表達 代表 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 支援與意見反應。