Object Model Reference : Classes : E : EffectExtrude : Properties : EffectExtrude.AngleX |
Property AngleX As Double
Member of EffectExtrude
The AngleX property returns or specifies the x-axis extrusion angle for an extruded object.
This property is a percentage that rotates the extrusion along the x-axis.
The following VBA example selects all objects with extrusions that were rotated in three-dimensional space.
Sub Test() |
Dim s As Shape, eff As Effect |
Dim sr As New ShapeRange |
For Each s In ActivePage.Shapes |
For Each eff In s.Effects |
If eff.Type = cdrExtrude Then |
With eff.Extrude |
If .AngleX <> 0 Or .AngleY <> 0 Or .AngleZ <> 0 Then sr.Add s |
End With |
Exit For |
End If |
Next eff |
Next s |
sr.CreateSelection |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.