EXCE来自L中怎么在每行下面插入相同的行？

在日常工作的时候，在操作EXCEL的时候，当表格内出现了很多空白的行，如果想删除的话，具体的操作方法如下：

首先，选择数据区域内容最多的一列，然后依次点击数据——筛选——选择空白选项——点击重新应用（删除多行时，一定要点击重新应用，避免删除隐藏行）——选择空白行进行删除。

排序删除法

在数据区域中插入一列辅助列，依次填充1至N，然后点击数据内容最多的一列，点击数据——排序——扩充选定区域——选择需要排序的列以及顺序，即可将空白行排至数据区域末尾。为了保证原有数据区域坚龙停皮证犯顺序不变，删除掉多余的辅助列区域后，将辅助列按照升序进行排列，最后删除掉辅助列即可。

定位删除法

选择数据区域内容最多的一列，按F5调出定位功能对话框，定位条件选择空值，然后在开始菜单中，找到删除——删除工作表行即可。追问 : 不是，网格线无所谓，是我的数据只有500多行，但突然自己变成一百万多行了，操作很不方便，我想删除多余的空白行
追答 : 把你的500多行数据复制到新表格里，这个可以删了：）
追问 : 这是公司共享的，能复制到新的我就不用这么费劲了
追答 : 共享的你就不用管它，也许是文件已经设置不让删除了
追问 : 粘到新的表格里也是一样的。。。没救了

向数据透视表添加字段

在“数据透视表晶角担衣模啊让端互喜氢字段列表”中，执行下面的一项或多项操作：

若要将字段放置到布局部分的默认区域中，请在字段部分中选中相应字段名称旁的复选框。
默认情况下，非数值字段会添加到“行360问答标签”区域，数值字段会添加到“值”区域，而联机分析处理 (OLAP) 日期和时间层级则会添加到“列标签”区域。

字段部分包含可以添加到布局部分的字段的字段名称。

布局部分包含“报表筛选”区域、“列标签”区域、“行标签”区域和“值”区域。

若要将字段放置到布局部分的特定区域中，请在字段部分中右键单击相应的字段名称，然后选择“添加到报表筛选”、“添加到列标签”、“添加到行标签”或“添加到值”。
若要将字段拖放到所需的区域，请在字段部分中单击并按住相应的字段名称，然后将它拖到布局部分中的所需区域中。

提示 您可以稍后根据需要使用“数据透视表字段列表”重新排列字段，方法是：在布局部分中右键单蛋部写秋击相应字段，然后选择所需的区域，或者在布局部分中的区域间拖动字段。

在每行下面插入相同的行，可以用VBA编程来实现。360问答例如每行下面插入2行，其代码如下：
Sub 插入()
Dim I As Integer
I = 1
Do While Cells(I, 1) <> "" '判断首列为空时结束。可以根据实际情况做调整


    Cells(I + 1, 1).Select
    Selection.EntireRow.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
    Selection.EntireRow.Insert , CopyO久志多微乙科清孩职散rigin:=xlFormatFromLef觉某检纸孔例硫但促注按tOrAbove
    I = I + 3
    
Loop


End Sub
运行前表格如图所示：

运行后如图：