一站直销 > 现在在Excel表格中有200行，现在要每隔两行就插入两行，如何快速插入？

现在在Excel表格中有200行，现在要每隔两行就插入两行，如何快速插入？

2025-04-06 03:49:06

推荐回答（3个）

回答1：

请在A列插入一列，在A1输入 1，在A2输入4，选择A1:A2复制下拉200行；
在A201输入2，A202输入=A201+1，A203输入=A201+3，选择A202:A203下拉至A600；
对A列排升序，再删除A列即可。

回答2：

用macro 先记录插两行的然后复制命令改成递推的

回答3：

Sub 鼠标放在首行()
Dim a As Integer
For a = 1 To 100 '100是次数，自己可以改
ActiveCell.Offset(2, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
ActiveCell.Offset(3, 0).Rows("1:1").EntireRow.Select
Next
End Sub