Свойство CalloutFormat.Drop (Excel)

Для выносок с явно заданным раскрывающимся значением это свойство возвращает вертикальное расстояние (в точках) от края текстового ограничивающего поля до места, где строка выноски присоединяется к текстовому поле. Только для чтения Single.

Синтаксис

expression. Капля

выражение Переменная, представляющая объект CalloutFormat .

Замечания

Это расстояние измеряется от верхней части текстового поля, если для свойства AutoAttach не задано значение True, а текстовое поле находится слева от начала строки выноски (место, на которое указывает выноска). В этом случае расстояние от падения измеряется от нижней части текстового поля.

Используйте метод CustomDrop , чтобы задать значение этого свойства.

Значение этого свойства точно отражает положение вложения строки выноски в текстовое поле только в том случае, если выноска имеет явно заданное значение drop, то есть если значение свойства 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 и обратная связь.