请教一个用vba筛选后分段合计的问题~~

小宇宙1 · 发表于 2017-6-26 22:21

请见附件的sheet1，有个发工资的表，里面混杂着第一车间，第二车间，特殊车间的人员。我要排序后剔除特殊车间的人，然后5条记录加1个合计数共6行成为一个组（最后一组可能没有6行），排列出来，合计数为“借”，人员为“贷”，见sheet2即为成品。请问这个代码如何写为好呢？谢谢先~~

蓝桥玄霜 · 发表于 2017-6-27 10:27

请见代码。

小宇宙1 · 发表于 2017-6-28 00:38

本帖最后由小宇宙1 于 2017-6-28 00:46 编辑

蓝桥玄霜发表于 2017-6-27 10:27
请见代码。

谢谢前辈指点哦，排序的那句把标题一起排进去了，后面就计算不出了，貌似可以修改为Sheet1.[a1].CurrentRegion.Sort Sheet1.[a2], 2, , , , , , 0, 1, 0, 1, 1, 1
我再学习学习~

		自动登录	找回密码
密码			免费注册