Is there a way to draw an arc which is 1/4 of a circle?
It looks like Shapes.addcurve only draw bezier curve, but how do I make the
curve a 1/4 of a circle?

I also tried Shapes.BuildFreeForm().AddNodes(), but I couldn't get it to
draw 1/4 of a circle.

This appears to work for me:

ActiveSheet.Shapes.AddShape(msoShapeArc, 100#, 100#, 75#, 75#)



In article ,
"Johannes" wrote:

Is there a way to draw an arc which is 1/4 of a circle?
It looks like Shapes.addcurve only draw bezier curve, but how do I make the
curve a 1/4 of a circle?

I also tried Shapes.BuildFreeForm().AddNodes(), but I couldn't get it to
draw 1/4 of a circle.

In Excel 2000 I had to lose the parentheses for it to work.

ActiveSheet.Shapes.AddShape msoShapeArc, 100#, 100#, 75#, 75#

Mike F

"JE McGimpsey" wrote in message
...
This appears to work for me:

ActiveSheet.Shapes.AddShape(msoShapeArc, 100#, 100#, 75#, 75#)



In article ,
"Johannes" wrote:

Is there a way to draw an arc which is 1/4 of a circle?
It looks like Shapes.addcurve only draw bezier curve, but how do I make
the
curve a 1/4 of a circle?

I also tried Shapes.BuildFreeForm().AddNodes(), but I couldn't get it to
draw 1/4 of a circle.

True - I had orignally assigned the shape to an object variable, which
then requires the parens. Thanks for the correction.

In article ,
"Mike Fogleman" wrote:

In Excel 2000 I had to lose the parentheses for it to work.

ActiveSheet.Shapes.AddShape msoShapeArc, 100#, 100#, 75#, 75#