Свойство ThreeDFormat.Depth (Word)

Возвращает или задает глубину экструзии фигуры. Для чтения и записи, Single.

Синтаксис

expression. Глубина

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

Замечания

Свойство Depth может быть значением от - 600 до 9600 (положительные значения создают экструзию, лицевая часть которой является исходной фигурой; отрицательные значения создают экструзию, чья обратная грань является исходной).

Пример

В этом примере к активному документу добавляется овал, а затем указывается, что овал должен быть экструдирован на глубину 50 точек, а экструзия — фиолетовым.

Dim docActive As Document 
Dim shapeNew As Shape 
 
Set docActive = ActiveDocument 
Set shapeNew = docActive.Shapes.AddShape(msoShapeOval, _ 
 90, 90, 90, 40) 
 
With shapeNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 ' RGB value for purple 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With

См. также

Объект ThreeDFormat

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

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