我想在excel100行中，每隔一行内容，插入3行空白行，怎么做到，急求！

Question

如题所述

Answer 1

选中

假设原始数据在A1：F100中，在G列增加一个辅助列，G2中输入0.5，G3中输入3.5，选中G2：G3，下拉到G100，G100的数字就是294.5，G101中输入294，G102中输入293，选中G101：G102，下拉到1为止，再利用选中A：G，利用G列进行排序，就可以插入空行，最后把G列删除。

Answer 2

需要宏代码才能实现追问

麻烦提供一下

追答

宏代码没有，提供一个变通的办法，你参照一下

宏代码：

Sub a()

    Dim i As Integer

    For i = 100 To 2 Step -1

'第2行前开始才插入空白

        Rows(i & ":" & (i + 2)).Insert

'第5行前插入三行空白，第4行插入三行空白，依次，一直到第2行前插入插入一行空白终止

      Next

End Sub

Sub 隔4行插入表头()

For i = 29 To 6 Step -4

   '结尾行是29,第二次出现表头的行是6,间隔4行插入表头

    Range("A1:K1").Copy

    '表头是A1:K1

    Rows((i - 3) & ":" & i).Insert Shift:=xlDown

    '间隔是i和i-3之间，也就是相差4行插入

Next

End Sub

本回答被提问者采纳