會傳回文字週框方塊邊緣到文字方塊中附加之圖說文字線之間的垂直距離 (以點為單位)。 唯讀 單一 。
語法
表情。落
詞 一個代表「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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。