図形の 3-D の書式を表します。
注釈
傾斜した図形、または 2 か所以上のパスの途切れた部分がある図形に、3-D の書式を設定することはできません。 その図形で ThreeDFormat オブジェクトのプロパティやメソッドを使用しても、ほとんどが失敗します。
例
Shape オブジェクトの ThreeD プロパティを使用して、ThreeDFormat オブジェクトを返します。 次の例では、楕円を myDocument に追加し、楕円を 50 ポイントの深さまで押し出し、押し出しを紫色にすることを指定します。
Set myDocument = Worksheets(1)
Set myShape = myDocument.Shapes.AddShape(msoShapeOval, _
90, 90, 90, 40)
With myShape.ThreeD
.Visible = True
.Depth = 50
.ExtrusionColor.RGB = RGB(255, 100, 255)
' RGB value for purple
End With
メソッド
- IncrementRotationHorizontal
- IncrementRotationVertical
- IncrementRotationX
- IncrementRotationY
- IncrementRotationZ
- ResetRotation
- SetExtrusionDirection
- SetPresetCamera
- SetThreeDFormat
プロパティ
- Application
- BevelBottomDepth
- BevelBottomInset
- BevelBottomType
- BevelTopDepth
- BevelTopInset
- BevelTopType
- ContourColor
- ContourWidth
- Creator
- Depth
- ExtrusionColor
- ExtrusionColorType
- FieldOfView
- LightAngle
- Parent
- Perspective
- PresetCamera
- PresetExtrusionDirection
- PresetLighting
- PresetLightingDirection
- PresetLightingSoftness
- PresetMaterial
- PresetThreeDFormat
- ProjectText
- RotationX
- RotationY
- RotationZ
- Visible
- Z
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。