1、我们点击下图框内选项
2、我们输入下图代码Sub 插入1()Rows(2).DeleteEnd Sub其中Rows(2).Delete就是删除第行的意思
3、我们在A2输入567
4、运行宏程序后刚才输入的一行就给删除了