Object Model Reference : Classes : E : EffectExtrude : Properties : EffectExtrude.FaceVisible |
Property FaceVisible As Boolean
Member of EffectExtrude
The FaceVisible property returns whether the control face is visible for an extrusion. It returns True if the extrusions control shape is visible.
The face may not be visible if the extrusion was rotated in three-dimensional space or if one of the following extrusion type was used: Front Parallel, Small Front, or Big Front.
The FaceVisible property returns a read-only value.
The following VBA example selects all extruded shapes for which the faces are not visible.
Sub Test() |
Dim s As Shape, ext As EffectExtrude |
Dim sr As New ShapeRange |
For Each s In ActivePage.Shapes |
If s.Type = cdrExtrudeGroupShape Then |
Set ext = s.Effect.Extrude |
If ext.FaceVisible = False Then |
sr.Add ext.FaceShape |
If Not ext.ShowBevelOnly Then sr.Add s |
If ext.UseBevel Then sr.Add ext.BevelGroup |
End If |
End If |
Next s |
sr.CreateSelection |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.