怎么用vba宏代码在excel中插入直线

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

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

3、在代码编辑窗口输入以下代码，运行即可在工作表中插入直线。

Sub Macro1()

    ActiveSheet.Shapes.AddShape Type:=msoShapeMixed

    .Select

End Sub