📅  最后修改于: 2022-03-11 14:51:57.682000             🧑  作者: Mango
代码示例1
Sub LeCercle()
Dim Rayon As Single
Rayon = 50
ActiveSheet.Shapes.AddShape msoShapeOval, [C3].Left, [C3].Top, Rayon, Rayon
End Sub