1、点击开发工具下的VB编辑器进入vba代码编辑窗口。
2、在编辑器中点击“插入”->“模块”,创建新的vba代码模块。
3、在代码编辑窗口输入以下代码,运行即可插入直角三角形。Sub Macro1() A罕铞泱殳ctiveSheet.Shapes.AddShape Type:=msoShapeRightTriangle, Left:=957, Top:=722.25, Width:=226.5, Height:=139.5End Sub
1、点击开发工具下的VB编辑器进入vba代码编辑窗口。
2、在编辑器中点击“插入”->“模块”,创建新的vba代码模块。
3、在代码编辑窗口输入以下代码,运行即可插入直角三角形。Sub Macro1() A罕铞泱殳ctiveSheet.Shapes.AddShape Type:=msoShapeRightTriangle, Left:=957, Top:=722.25, Width:=226.5, Height:=139.5End Sub