Drawing

[esbrao]

Is there a way of drawing circles of a chosen radius in EXCEL format ? I have seen a way of drawing rectangles or squares etc. and draw rectangular plans such as building plan etc. But wonder how to draw a circle in EXCEL? Thanks in advance for any guidelines from Excel experts.
Esb Rao

 

[patel45]

assume x, y, R in b1, b2, b3

Sub a()
Dim shpCircle As Shape
With ActiveSheet
  Set shpCircle = .Shapes.AddShape(msoShapeOval, _
    .Range("B1").Value - Range("B3").Value, _
    .Range("B2").Value - Range("B3").Value, _
    .Range("B3").Value * 2, .Range("B3").Value * 2)
    End With
End Sub

 

[pgc01]

Hi

For ex., this draws a circle of radius 100 points at the top left of Sheet2 and names it:

Sub x()
Dim ov As Oval

Set ov = Worksheets("Sheet2").Ovals.Add(0, 0, 100, 100)
ov.Name = "MyCircle"
End Sub