通过VBA实现一键在指定位置插入指定数目的空行，尤其适用于插入多行空行的情况。
工具/原料
Excel（教程以Excel2013为例）
方法/步骤
1
本教程以图中数据为例，为了更好理解，教程中源数据第一列数字与行号一致。
2
插入ActiveX按钮控件，如果没有找到该命令，可以参考以下链接：
3
设置按钮格式，本教程编辑文字为”插入空行“。
4
右键为该按钮指定一个宏，选择”新建“。
5
在Sub 按钮1_Click()和End Sub之间输入以下代码：Dim i%Dim j%Dim x As ByteDim k As Bytek = Range('c1').Value '插入空行数目为C1单元格的值 For x = 1 To k Step 1 i = ActiveCell.Row j = ActiveCell.Column Cells(i, j).EntireRow.Select Selection.Insert shift:=xlDown, copyorigin:=xlformafromleftorabove Next
6
从VBA窗口切换到Excel窗口，在C1单元格中输入数字2（插入2行空行的意思）.
7
选择需要插入行位置（可以选择该行的一个单元格，或该行的多个单元格，或该行整行），点击”插入空行“按钮即可。
注意事项
如果对您有点帮助，请支持一下，谢谢！
下一篇：第五人格约瑟夫怎么玩