共用方式為


ShapeRange.ThreeD 屬性 (Publisher)

會傳回 ThreeDFormat 物件。

語法

運算式ThreeD

表達 代表 ShapeRange 物件的 變數。

註解

使用 ThreeD 屬性可傳回 ThreeDFormat 物件,其屬性是用來格式化指定圖案的 3D 外觀。

範例

本範例會設定套用至使用中出版物第一個圖案之 3D 效果的深度、立體化色彩、立體化方向和光源方向。

Dim tdfTemp As ThreeDFormat 
 
Set tdfTemp = _ 
 ActiveDocument.Pages(1).Shapes(1).ThreeD 
 
With tdfTemp 
 .Visible = True 
 .Depth = 50 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
 .SetExtrusionDirection _ 
 PresetExtrusionDirection:=msoExtrusionTop 
 .PresetLightingDirection = msoLightingLeft 
End With 

支援和意見反應

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