Свойство CalloutFormat.Drop (Издатель)

Статья
04/07/2023

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

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

Синтаксис

expression. Падение

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

Возвращаемое значение

Variant

Примечания

Числовые значения оцениваются в пунктах; строки могут находиться в любых единицах, поддерживаемых Microsoft Publisher (например, "2.5 in").

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

Значение этого свойства точно отражает положение вложения строки выноски в текстовое поле только в том случае, если выноска имеет явно заданное значение drop, то есть если значение свойства DropType равно msoCalloutDropCustom.

Пример

В этом примере настраиваемое удаление первой фигуры в активной публикации заменяется одним из двух предустановленных удалений в зависимости от того, превышает или меньше половины высоты текстового поля выноски. Чтобы пример работал, фигура должна быть выноской.

With ActiveDocument.Pages(1).Shapes(1).Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop DropType:=msoCalloutDropTop 
 Else 
 .PresetDrop DropType:=msoCalloutDropBottom 
 End If 
 End If 
End With

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через