如何利用execl实现按指定条件自动增加行

来源:百度知道 编辑:UC知道 时间:2024/06/10 01:02:54
如何利用execl实现按指定条件自动增加行,如:
工作表中当A列的数据结尾为001时,如何实现在结尾为001的行之前插入一行,并在该行中自动填入为001的行的数据(去掉001),即:如A1的数据为430704016021001,则在第1行前插入一行,并在插入的行的第一个表格填入430704016021。
还有在插入的行的第二列填入以前表格A3的后三个汉字.
说的不清楚的地方看处理前后的数据对比
未处理前数据:
A B C
1 对象代码 对象姓名 家庭地址
2 430704016021001001 李国平 合口三合第一组
3 430704016021001002 李先茂 合口三合第一组
4 430704016021001003 李启发 合口三合第一组
5 430704016021002001 乔兴发 合口三合第二组

处理后数据:
A B C
1 对象代码 对象姓名 家庭地址
2 430704016021001 第一组
3 430704016021001001 李国平 合口三合第一组
4 430704016021001002 李先茂 合口三合第一组
5 430704016021001003 李启发 合口三合第一组
6 430704016021002 第二组
7 430704016021002001 乔兴发 合口三合第二组

如果你不想通过VBA(宏)来实现,可以尝试下面的方法。
增加两列内容,
D列为属性,D2=LEFT(A2,15),向下填充
E列为分组,E2="第"&RIGHT(D2,1)&"组",向下填充
此时你可以做一个分类汇总,分类字段选“分组”,汇总方式选“计数”,汇总项选“对象代码”,确定。
你也可以做一个简单的数据透视表。
看看结果,可能跟您需要的还有距离,但在不编写宏的情况下,应该是最好的结果了。