1、点击开发工具下的VB编辑器进入vba代码编辑窗口。
2、在编辑器中插入新的模块。
3、在代码编辑窗口输入以下代码,运行即可插入十字形形状。Sub Macro1() A罕铞泱殳ctiveSheet.Shapes.AddShape Type:=msoShapeCross, Left:=134.25, Top:=102.75, Width:=321.75, Height:=305.25End Sub
1、点击开发工具下的VB编辑器进入vba代码编辑窗口。
2、在编辑器中插入新的模块。
3、在代码编辑窗口输入以下代码,运行即可插入十字形形状。Sub Macro1() A罕铞泱殳ctiveSheet.Shapes.AddShape Type:=msoShapeCross, Left:=134.25, Top:=102.75, Width:=321.75, Height:=305.25End Sub