Excel) (CalloutFormat.Drop 屬性

對於具有明確設定放置值的圖說文字,此屬性會傳回從文字邊界方塊到圖說文字線附加至文字方塊 位置) 的 垂直距離 (。 唯讀 單一 。

語法

運算式。放置

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

註解

除非 [自動附加 ] 屬性設為 True,且文字方塊位於圖說文字線原點的左側 (圖說文字指向) 的位置,否則此距離是從文字方塊頂端開始測量的,在此情況下,放置距離是從文字方塊底部開始測量。

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

只有在圖說文字具有明確設定的放置值時,也就是 DropType 屬性的值為 msoCalloutDropCustom,此屬性的值才會準確反映文字方塊中的圖說文字行附件的位置。

範例

本範例根據自訂的落差值是大於還是小於圖說文字方塊高度的一半,將 myDocument 上第一個圖案的自訂落差值取代為兩個預設落差值之一。 為使本範例正常執行,第一個圖案必須是圖說文字。

Set myDocument = Worksheets(1) 
With myDocument.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 支援與意見反應。