共用方式為


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

另請參閱

ShapeRange 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應