Excel表格中如何在隔一排中插入指定的排数？

1、假定原数据在A列,请在后面空白列的第一行输入1,按Ctrl+鼠标左键往下拉至相应行，形成与行号相同的序列数。
2、在A列的下面输入你要插入的两行内容，用鼠标选定这两个单元格，向下复制若干行（具体行数为A列原有数据的行数）。
3、在后面空白列的最后一行（假定为F100单元格）输入1.2，在下一行输入公式：
=F100+0.5
将公式向下复制到相应行。
4、选定最后一列，点"复制",在该列第一行点右键"选择性粘贴",选中"数值",点"确定"。
5、将全表按最后一列排序，然后删除最后一列。

看你的要求，我想这个宏应该满足你的要求了。你只要改几个数就能达到批量插入空白行的目的。 你可以自己验证。

代码（1到5行）：
Sub Macro1()
Dim xcell As String
Dim i_end, i_start As Integer
Dim i_rows As Integer

i_end = 5 '插入范围的最末行。
i_start = 1 '插入范围的起始行
i_rows = 1 '要插入的行数,自己改

Do Until i_end < i_start
xcell = i_end & ":" & i_end
Rows(xcell).Select

For i = 1 To i_rows
Selection.Insert Shift:=xlDown
Next

i_end = i_end - 1
Loop
End Sub

排就是行了?
不过此方式行、列均可。

首先选中你想要的行数或列数后，按住ctrl再选你想要的行数或列数(在你想插入的位置单击鼠标)，选中很多后,在选中的任意行或列单击鼠标右键，“插入”即可批量插入。（必须是在选中的位置单击鼠标右键，否则会撤消选中）

选时