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


Метод Shapes.AddTextbox (Excel)

Создает текстовое поле. Возвращает объект Shape , представляющий новое текстовое поле.

Синтаксис

expression. AddTextbox (ориентация, слева, сверху, ширина, высота)

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

Параметры

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

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

Shape

Пример

В этом примере в myDocument добавляется текстовое поле, содержащее текстовое поле test Box.

Set myDocument = Worksheets(1) 
myDocument.Shapes.AddTextbox(msoTextOrientationHorizontal, _ 
    100, 100, 200, 50) _ 
    .TextFrame.Characters.Text = "Test Box"

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

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