Object Model Reference : Classes : E : Ellipse : Properties : Ellipse.EndAngle |
Property EndAngle As Double
Member of Ellipse
The EndAngle property returns or specifies the end angle of an arc or pie.
The following VBA example sets the start angle of the pie or arc to be 90° greater than its end angle (making sure that the angle does not exceed the limit of 360°).
Sub Test() |
Dim s As Shape |
Dim a As Double |
Set s = ActiveShape |
If s.Type = cdrEllipseShape Then |
a = s.Ellipse.EndAngle + 90 |
If a >= 360 Then a = a - 360 * Fix(a / 360) |
s.Ellipse.StartAngle = a |
End If |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.