Class ThreeDFormat (Word VBA)

The class ThreeDFormat represents a shape's three-dimensional formatting.

Set

To use a ThreeDFormat class variable it first needs to be instantiated, for example

Dim tdf as ThreeDFormat
Set tdf = Selection.Font.ThreeD

The following procedures can be used to set variables of type ThreeDFormat: ChartFormat.ThreeD, Font.ThreeD, Shape.ThreeD, ShapeRange.ThreeD and TextFrame.ThreeD

Themes

The following procedures in this class have been grouped together and are described on a separate theme page

Format with its procedures ContourColor, ContourWidth, ExtrusionColor, ExtrusionColorType, PresetThreeDFormat, SetThreeDFormat and Visible

Properties

BevelBottomDepth returns or sets a Single that represents the depth of the bottom bevel.

Selection.Font.ThreeD.BevelBottomDepth =

BevelBottomInset returns or sets a Single that represents the inset size for the bottom bevel.

Selection.Font.ThreeD.BevelBottomInset =

BevelBottomType returns or sets an MsoPresetCamera constant that represents the bevel type for the bottom bevel.

Selection.Font.ThreeD.BevelBottomType =

BevelTopDepth returns or sets a Single that represents the depth of the top bevel.

Selection.Font.ThreeD.BevelTopDepth =

BevelTopInset returns or sets a Single that represents the inset size for the top bevel.

Selection.Font.ThreeD.BevelTopInset =

BevelTopType returns or sets an MsoPresetCamera constant that represents the bevel type for the top bevel.

Selection.Font.ThreeD.BevelTopType =

Depth returns or sets the depth of the shape's extrusion.

Selection.Font.ThreeD.Depth =

FieldOfView returns or sets a Single that represents the amount of perspective for a shape.

Selection.Font.ThreeD.FieldOfView =

LightAngle returns or sets a Single that represents angle of the lighting.

Selection.Font.ThreeD.LightAngle =

Parent returns an object that represents the parent object of the specified ThreeDFormat object.

Dim objParent As Object
Set objParent = Selection.Font.ThreeD.Parent

Perspective msoTrue if the extrusion appears in perspective — that is, if the walls of the extrusion narrow toward a vanishing point. MsoFalse if the extrusion is a parallel, or orthographic, projection — that is, if the walls don't narrow toward a vanishing point.

Selection.Font.ThreeD.Perspective =

PresetCamera returns an MsoPresetCamera constant that represents the camera presets.

Dim mpcPresetCamera As Office.MsoPresetCamera
mpcPresetCamera = Selection.Font.ThreeD.PresetCamera

PresetExtrusionDirection returns the direction taken by the extrusion's sweep path leading away from the extruded shape (the front face of the extrusion).

Dim mpePresetExtrusionDirection As Office.MsoPresetExtrusionDirection
mpePresetExtrusionDirection = Selection.Font.ThreeD.PresetExtrusionDirection

PresetLighting returns or sets an MsoBevelType constant that represents the lighting preset.

Selection.Font.ThreeD.PresetLighting =

PresetLightingDirection returns or sets the position of the light source relative to the extrusion.

Selection.Font.ThreeD.PresetLightingDirection =

PresetLightingSoftness returns or sets the intensity of the extrusion lighting.

Selection.Font.ThreeD.PresetLightingSoftness =

PresetMaterial returns or sets the extrusion surface material.

Selection.Font.ThreeD.PresetMaterial =

ProjectText returns or sets an MsoTriState constant that represents whether text on a shape rotates with shape. msoTrue rotates the text.

Selection.Font.ThreeD.ProjectText =

RotationX returns or sets the rotation of the extruded shape around the x-axis in degrees.

Selection.Font.ThreeD.RotationX =

RotationY returns or sets the rotation of the extruded shape around the y-axis, in degrees.

Selection.Font.ThreeD.RotationY =

RotationZ returns or sets a Single that represents z-axis rotation of the camera.

Selection.Font.ThreeD.RotationZ =

Z returns or sets a Single that represents the z-axis for the shape.

Selection.Font.ThreeD.Z =