怎么用vba宏代码在excel中插入矩形形状

1、点击顶部菜单开发工具下的VB编辑器。

2、在编辑器窗口的顶部，点击插入模块。

3、在代码编辑窗口输入以下代码，运行即可在excel中插入矩形形状。

Sub Macro1()

ActiveSheet.Shapes.AddShape Type:=msoShapeRectangle

End Sub