文档详情

excel隔行插入空行的三种方法.docx

发布:2017-05-28约小于1千字共2页下载文档
文本预览下载声明
隔行插入空行,经常遇到有人问这种问题,现在归纳一下。 1. 一个辅助列 ,填充序列,借助排序功能,把空白行与原来的行排序。该操作是根据相同序列号,排序的时候会排列在一起,实现类似插入空行的效果;注意,关键字排序选择序列号所在列字段 2.两个个辅助列,隔行填充数字,借助F5定位空白功能,插入行。两列隔行填充序列,刚好错开原始数据,定位后插入刚好可以在每一行前插入一行。 3.借助VBA实现。复制以下代码,运行即可。注意:代码中的数字5表示有五行数据需要在第2行(to后面的2)隔1行(-1)插入一行,可以自行修改一下;如果要隔2行插入1行,只要把Rows(i : i)改为Rows(i : (i+1))即可。如果对VBA没有任何认识,不太建议使用此方法。 Sub 选定范围隔行插入一行() ? ? Dim i As Integer? ? ? ? For i = 5 To 2 Step -1 第2行前开始才插入空白 ? ?? ???Rows(i : i).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
显示全部
相似文档