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. Read/write MsoTriState.
MsoTriState can be one of these MsoTriState constants. |
msoCTrue |
msoFalse |
msoTriStateMixed |
msoTriStateToggle |
msoTrue |
expression.Perspective
expression Required. An expression that returns one of the objects in the Applies To list.
This example sets the extrusion depth for shape one on the first page to 100 points and specifies that the extrusion be parallel, or orthographic. For this example to work, the specified shape must be a 3-D shape.
Sub ChangePerspective()
With ActiveDocument.Pages(1).Shapes(1).ThreeD
.Visible = True
.Depth = 100
.Perspective = msoFalse
End With
End Sub