Заметка
Доступ к этой странице требует авторизации. Вы можете попробовать войти в систему или изменить каталог.
Доступ к этой странице требует авторизации. Вы можете попробовать сменить директорию.
Возвращает объект Shape , представляющий новую автофигуру на листе.
Синтаксис
expression. AddShape (Type, Left, Top, Width, Height)
выражение: переменная, представляющая объект Shapes.
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Тип | Обязательный | MsoAutoShapeType | Указывает тип создаваемого автофигуры. |
| Left | Обязательный | Single | Положение (в точках) левого верхнего угла ограничивающего прямоугольника AutoShape относительно левого верхнего угла документа. |
| Top | Обязательный | Single | Положение (в точках) левого верхнего угла ограничивающего прямоугольника Автофигуры относительно верхней части документа. |
| Width | Обязательный | Single | Ширина ограничивающего прямоугольника AutoShape в точках. |
| Height | Обязательный | Single | Высота ограничивающего прямоугольника AutoShape в точках. |
Возвращаемое значение
Shape
Замечания
Чтобы изменить тип добавленного объекта AutoShape, задайте свойство AutoShapeType .
Пример
В этом примере в myDocument добавляется прямоугольник.
Set myDocument = Worksheets(1)
myDocument.Shapes.AddShape msoShapeRectangle, 50, 50, 100, 200
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.