| Name | Type | Description |
|---|---|---|
| Left |
Double
|
|
| Top |
Double
|
|
| Right |
Double
|
|
| Bottom |
Double
|
|
| StartAngle |
Double
|
Specifies the degree of the start angle for the ellipse. |
| EndAngle |
Double
|
Specifies the degree of the end angle of the ellipse. Altering the start angle changes the shape of the ellipse. |
| Pie |
Boolean
|
Specifies whether to change the ellipse into a pie. |
Sub Test() Dim s As Shape Dim lr As Layer Set lr = ActiveLayer ActiveDocument.DrawingOriginX = -ActivePage.SizeWidth / 2 ActiveDocument.DrawingOriginY = -ActivePage.SizeHeight / 2 lr.CreateRectangle 0, 0, 3, 2 Set s = lr.CreateEllipse(0, 0, 3, 2) s.Fill.UniformColor.RGBAssign 255, 0, 0 'Red End Sub