PowerPoint) (ShapeRange.ThreeD 屬性
會傳回 ThreeDFormat 物件,其中包含指定圖案的 3D - 效果格式設定屬性。 唯讀。
語法
運算式。ThreeD
表達 代表 ShapeRange 物件的 變數。
傳回值
ThreeDFormat
範例
本範例會設定套用至 myDocument上第一個圖案之 3D 效果的深度、立體化色彩、立體化方向和光源方向。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
.Visible = True
.Depth = 50
'RGB value for purple
.ExtrusionColor.RGB = RGB(255, 100, 255)
.SetExtrusionDirection msoExtrusionTop
.PresetLightingDirection = msoLightingLeft
End With
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。