Using VBA in Excel, I want to create a wedge-shaped section of a circle (the desktop version from Office 365 ProPlus). The code below gives me the correct shape, but the curved section is merely an outline:
Dim myArc as Shape
Set myArc = ActiveSheet.Shapes.AddShape(msoShapeArc, 200, 100, 100, 100)
.Adjustments(1) = 0
.Adjustments(2) = 45
.Fill.Visible = msoTrue
Only the curve has an outline; the straight edges are undecorated. How can I completely encircle the shape using an outline? Should I substitute msoShapeArc with another shape? I've tried using the code below to change the line's colour, weight, and visibility, but it only modifies the curved edge, not the straight edges.
.Line.ForeColor.RGB = RGB(0, 0, 0)
.Line.Weight = 1
.Line.Visible = msoTrue
I've been able to find documentation on general shape properties, but not which properties apply to which type of shape, and how they actually work to control its appearance.