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

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

Синтаксис

выражения. Глубина

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

Примечания

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

Пример

В этом примере в активный документ добавляется овал, а затем указывается, что овал будет extruded до глубины 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 и обратная связь.