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


Метод Shapes.AddCallout (Word)

Добавляет выноску без границ на холст документа.

Синтаксис

expression. AddCallout (Type, Left, Top, Width, Height)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
Тип Обязательный MsoCalloutType Тип выноски.
Left Обязательный Single Положение в точках левого края ограничивающего прямоугольника выноски.
Top Обязательный Single Положение верхнего края ограничивающего прямоугольника выноски в точках.
Width Обязательный Single Ширина ограничивающего прямоугольника выноски (в точках).
Height Обязательный Single Высота ограничивающего прямоугольника выноски (в пунктах).

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

Shape

Замечания

С помощью метода AddShape можно вставить более разнообразные выноски, такие как выноски и облака.

Пример

В этом примере выноска добавляется к созданному холсту рисования.

Sub NewCanvasCallout() 
 Dim shpCanvas As Shape 
 
 'Add drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes.AddCanvas _ 
 (Left:=150, Top:=150, Width:=200, Height:=300) 
 
 'Add callout to the drawing canvas 
 shpCanvas.CanvasItems.AddCallout _ 
 Type:=msoCalloutTwo, Left:=100, _ 
 Top:=40, Width:=150, Height:=75 
End Sub

См. также

Объект Shapes Collection

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

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