CalloutFormat.Drop 屬性 (Word)

會傳回文字週框方塊邊緣到文字方塊中附加之圖說文字線之間的垂直距離 (以點為單位)。 唯讀 單一 。

語法

運算式。放置

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

註解

Drop 屬性會以明確設定的垂直距離值套用至圖說文字。 此距離是從文字方塊的頂端開始測量的,除非文字方塊位於圖說文字線原點的左側 (圖說文字指向) 的位置,在這種情況下,掉落距離是從文字方塊的底部開始測量的。

您可以使用 CustomDrop 方法可設定此屬性的值。

此屬性的值是否正確反映位置] 文字方塊中的圖說文字線附件只有圖說文字有明確設定 drop 值--亦即如果 DropType 屬性的值是 msoCalloutDropCustom 。 使用陳述式 PresetDrop msoCalloutCustomDrop 將 DropType 屬性設定為 msoCalloutDropCustom。

範例

本範例依據自訂的垂直距離值是大於或小於圖說文字方塊的一半高度,使用兩個預設值的其中一個來取代使用中文件之第一個圖案的自訂垂直距離。 為使範例能正常執行,第一個圖案必須是圖說文字。

Dim docActive As Document 
 
Set docActive = ActiveDocument 
 
With docActive.Shapes(1).Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop msoCalloutDropTop 
 Else 
 .PresetDrop msoCalloutDropBottom 
 End If 
 End If 
End With

另請參閱

CalloutFormat 物件

支援和意見反應

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