Метод Shapes.Add3DModel (Excel)

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

Синтаксис

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

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

Параметры

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

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

Shape

Примечания

Значение параметра LinkToFile может быть представлено одной из следующих констант MsoTriState.

Константа	Описание
msoCTrue	Не поддерживается.
msoFalse	Используется, чтобы сделать трехмерную модель независимой копией файла.
msoTriStateMixed	Не поддерживается.
msoTriStateToggle	Не поддерживается.
msoTrue	Связь трехмерной модели с файлом, из которого она была создана.

Значение параметра SaveWithDocument может быть представлено одной из следующих констант MsoTriState.

Константа	Описание
msoCTrue	Не поддерживается.
msoFalse	Сохранение только связанных данных в документе.
msoTriStateMixed	Не поддерживается.
msoTriStateToggle	Не поддерживается.
msoTrue	Сохранение связанной трехмерной модели с документом, в который она вставляется. Этот аргумент должен иметь значение msoTrue, если LinkToFile имеет значение msoFalse.

Пример

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

Set mySheet = Application.ActiveWorkbook.ActiveSheet
Set myShape = mySheet.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 и обратная связь.