Метод Shapes.Add3DModel (PowerPoint)

  • Статья

Создает объект Model3DFormat из существующего файла. Возвращает объект Shape, представляющий новую трехмерную модель.

Синтаксис

выражение.Add3DModel (FileName, LinkToFile, SaveWithDocument, Left, Top, Width, Height)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
FileName Обязательный String Файл, из которого создается объект трехмерной модели.
LinkToFile Обязательный MsoTriState Определяет, будет ли трехмерная модель привязана к файлу, из которого она была создана.
SaveWithDocument Обязательный MsoTriState Определяет, будет ли связанная трехмерная модель сохраняться вместе с документом, в который она вставляется. Этот аргумент должен иметь значение msoTrue, если LinkToFile имеет значение msoFalse.
Left Обязательный Single Измеряемое в пунктах положение левого края трехмерной модели относительно левого края слайда.
Top Обязательный Single Измеряемое в пунктах положение верхнего края трехмерной модели относительно верхнего края слайда.
Width Необязательно Single Ширина трехмерной модели в пунктах (введите -1 для автоматического вычисления ширины на основе размеров трехмерной модели).
Height Необязательно Single Высота трехмерной модели в пунктах (введите -1 для автоматического вычисления высоты на основе размеров трехмерной модели).

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

Shape

Пример

В этом примере трехмерная модель, созданная из файла Sphere.glb, добавляется в mySlide. Вставленная трехмерная модель внедряется в активный документ.

Set mySlide = Application.ActivePresentation.Slides(1) 
Set myShape = mySlide.Shapes.Add3DModel(FileName:="c:\my 3d models\sphere.glb", LinkToFile:=False, SaveWithDocument:=True, Left:=100, Top:=100, Width:=70, Height:=70 )

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

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