欢迎来到天天文库
浏览记录
ID:8816347
大小:12.88 KB
页数:2页
时间:2018-04-08
《excel隔行插入空行的三种方法》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、隔行插入空行,经常遇到有人问这种问题,现在归纳一下。1.一个辅助列,填充序列,借助排序功能,把空白行与原来的行排序。该操作是根据相同序列号,排序的时候会排列在一起,实现类似插入空行的效果;注意,关键字排序选择序列号所在列字段2.两个个辅助列,隔行填充数字,借助F5定位空白功能,插入行。两列隔行填充序列,刚好错开原始数据,定位后插入刚好可以在每一行前插入一行。3.借助VBA实现。复制以下代码,运行即可。注意:代码中的数字5表示有五行数据需要在第2行(to后面的2)隔1行(-1)插入一行,可以自行修改一下;如果要隔2行插入1行,只要把Rows(i&":"&i)改为Rows
2、(i&":"&(i+1))即可。如果对VBA没有任何认识,不太建议使用此方法。Sub选定范围隔行插入一行() DimiAsInteger Fori=5To2Step-1'第2行前开始才插入空白 Rows(i&":"&i).Insert'第5行前插入一行空白,第4行插入一行空白,依次,一直到第2行前插入插入一行空白终止 NextEndSubSub隔4行插入表头()Fori=29To6Step-4 '结尾行是29,第二次出现表头的行是6,间隔4行插入表头 Range("A1:K1").Copy '表头是A1:K1 Rows((i-3)&":
3、"&i).InsertShift:=xlDown '间隔是i和i-3之间,也就是相差4行插入NextEndSub
此文档下载收益归作者所有