我是Vba的新手,我必须用下面的方法绘制颜色填充的圆圈

1/4色实心圆,半色实心圆,3/4色实心圆

我知道我可以用下面的代码画一个彩色的圆圈

代码语言:javascript运行复制 Set shpOval = ActiveSheet.Shapes.AddShape(msoShapeOval, curCellLeft, curCellTop, 20, 20)

shpOval.Fill.ForeColor.RGB = RGB(128, 0, 0)上面的代码给了我一个全彩色填充的圆,我必须改变它的属性才能得到我上面提到的圆的形状。