Поделиться через

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

  • Статья

Возвращает объект ColorFormat , представляющий цвет экструзии фигуры.

Синтаксис

expression. ExtrusionColor

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

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

ColorFormat

Пример

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

Dim shpNew As Shape 
 
' Set a reference to a new oval. 
Set shpNew = ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeOval, _ 
 Left:=90, Top:=90, Width:=90, Height:=40) 
 
' Format the 3D properties of the oval. 
With shpNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With

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

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