根据条件寻找指定列之后求和？

cela924

部门	养老		医疗
	1月个人	1月单位	1月个人	1月单位
办公室
人力资源部
纪检监察室
科技部

各位大神，每月我都会登记五险一金明细台账，台账表样见下表，每个月还需要按部门汇总一张总表给财务记账，现在的操作是每个险种用数据透视表做了再汇总，工作量实在有点大，我现在想实现每月自动汇总，只需要改下红色部分就行

姓名	部门	1月个人	1月单位	2月个人	2月单位	3月个人	3月单位
张三	办公室	1100.4	2613.45	1100.4	2613.45	1100.4	2613.45
李四	人力资源部	955.28	2268.79	955.28	2268.79	955.28	2268.79
网无	纪检监察室	1100.4	2613.45	1100.4	2613.45	1100.4	2613.45
达芙妮	科技部	1100.4	2613.45	1100.4	2613.45	1100.4	2613.45
发你	办公室	251.6	597.55	251.6	597.55	251.6	597.55
马占锋	人力资源部	1100.4	2613.45	1100.4	2613.45	1100.4	2613.45
刘雅琪	纪检监察室	947.36	2249.98	947.36	2249.98	947.36	2249.98
浦娜娜	科技部	696.88	1655.09	696.88	1655.09	696.88	1655.09

cela924

朱荣兴 发表于 2017-12-15 21:22
典型的数组+字典求和，若今晚无人回，明早写代码。

一般的函数不能解决么？

cela924

朱荣兴 发表于 2017-12-16 11:40
排斥vba？？公式即使做到，数据多的话，卡死没商量。

哦，我前面用sumproduct做了一个巨复杂的公式，就是卡的很，看来确实不行，请指教

90后老大爷

坐等版主的代码