How do I round border intersection points (vs. 90 degree angles)?

B

BrandonG

I would like slightly rounded corners on some excel tables, and can't seem to
find information on whether this is even possible. Any help is appreciated.
 
G

Gord Dibben

You could use the drawing toolbar and select rounded rectangle from auto
shapes>basic shapes.

Draw a rectangle around the table then.

Format it to "no color".

This macro does this with any range selection.

Sub RoundRectangle()
Dim x, y As Single, area As Range
For Each area In Selection.Areas
With area
x = .Height * 0#
y = .Width * 0#
ActiveSheet.Rectangles.Add Top:=.Top - x, Left:=.Left - y, _
Height:=.Height + 1 * x, Width:=.Width + 1 * y
End With
With ActiveSheet.Rectangles(ActiveSheet.Rectangles.Count)
.Interior.ColorIndex = xlNone
.ShapeRange.AutoShapeType = msoShapeRoundedRectangle
End With
Next area
End Sub


Gord Dibben MS Excel MVP
 
Top