Метод Shapes.AddCallout (Издатель)
Добавляет новый объект Shape, представляющий выноску линии без границ, в указанную коллекцию Shapes .
Синтаксис
expression. AddCallout (Type, Left, Top, Width, Height)
выражение: переменная, представляющая объект Shapes.
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Тип | Обязательный | MsoCalloutType | Тип строки выноски. Может быть одной из констант MsoCalloutType . |
Left | Обязательный | Variant | Положение левого края фигуры, представляющей выноску линии. |
Top | Обязательный | Variant | Положение верхнего края фигуры, представляющей выноску линии. |
Width | Обязательный | Variant | Ширина фигуры, представляющей выноску линии. |
Height | Обязательный | Variant | Высота фигуры, представляющей выноску линии. |
Возвращаемое значение
Shape
Примечания
Для аргументов Left, Top, Width и Height числовые значения вычисляются в пунктах; строки могут находиться в любых единицах, поддерживаемых Microsoft Publisher (например, "2.5 in").
Пример
В следующем примере на первую страницу активной публикации добавляется новая свободно меняющаяся строка выноски.
Dim shpCallout As Shape
Set shpCallout = ActiveDocument.Pages(1).Shapes.AddCallout _
(Type:=msoCalloutTwo, _
Left:=144, Top:=216, _
Width:=36, Height:=72)
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.