1、点击开发工具下的VB编辑器进入vba代码编辑窗口。

3、在代码编辑窗口输入以下代码,运行即可在工作表中插入直线。Sub Macro1() ActiveSheet.Shapes.AddShape Type:=msoSh锾攒揉敫apeMixed .SelectEnd Sub

时间:2024-10-15 01:03:30
1、点击开发工具下的VB编辑器进入vba代码编辑窗口。
3、在代码编辑窗口输入以下代码,运行即可在工作表中插入直线。Sub Macro1() ActiveSheet.Shapes.AddShape Type:=msoSh锾攒揉敫apeMixed .SelectEnd Sub