Свойство ThreeDFormat.PresetThreeDFormat (Publisher)

Возвращает константу MsoPresetThreeDFormat , представляющую предустановленный формат экструзии. Только для чтения.

Синтаксис

expression. PresetThreeDFormat

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

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

MsoPresetThreeDFormat

Замечания

Значение свойства PresetThreeDFormat может быть одной из констант MsoPresetThreeDFormat , объявленных в библиотеке типов Microsoft Office.

Каждый формат предустановленной экструзии содержит набор предустановленных значений для различных свойств экструзии. Если экструзия имеет пользовательский формат, а не предустановленный формат, это свойство возвращает msoPresetThreeDFormatMixed.

Значения этого свойства соответствуют параметрам (нумерованным слева направо, сверху вниз), отображаемым при нажатии кнопки 3D-стиль на панели инструментов Форматирование .

Используйте метод SetThreeDFormat , чтобы задать предустановленный формат экструзии.

Пример

В этом примере формат экструзии для первой фигуры на первой странице активной публикации устанавливается как 3D Style 12, если фигура изначально имеет пользовательский формат экструзии. Чтобы этот пример работал, указанная фигура должна быть трехмерной.

Sub SetPreset3D() 
 With ActiveDocument.Pages(1).Shapes(1).ThreeD 
 If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then 
 .SetThreeDFormat msoThreeD12 
 End If 
 End With 
End Sub

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

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