Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает объект 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 и обратная связь.