Excel () 的 CalloutFormat.Drop 屬性
對於具有明確設定置放值的圖說文字,這個屬性會傳回垂直距離, (以 文字 周框方塊邊緣) 到圖說文字線附加至文字方塊之位置的點數。 唯讀 單一 。
語法
運算式。下降
表達 代表 CalloutFormat 物件的 變數。
註解
除非 AutoAttach 屬性設定為 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 支援與意見反應。