Rectangle.RadiusLowerLeft

Property RadiusLowerLeft As Double

The RadiusLowerLeft property returns or sets the radius of a rectangle’s lower-left hand corner.

The radius is measured in document units and is not relative to the size of the rectangle.

The following code example rounds the corners of the selected rectangle by specifying a different corner radius (0.1", 0.2", 0.3", and 0.4") for each corner:

Sub Test() 
 If ActiveShape.Type <> cdrRectangleShape Then Exit Sub 
 With ActiveShape.Rectangle 
  .RadiusLowerLeft = 0.1 
  .RadiusLowerRight = 0.2 
  .RadiusUpperLeft = 0.3 
  .RadiusUpperRight = 0.4 
 End With 
End Sub