[分享]工资表按部门分组（非常实用）

ljx63426

<font size="4">尊敬的<font face="宋体">weiguoyin868老师，您好,您的大作，我已经下来学习了，很好用，我有个小小的请求，您能否做成任意多列分部门汇总形式，因为我单位工资表有好多列的数据需要汇总，我想改您的代码，但看不懂代码，敬请您再写多列汇总，好吗？多谢了。</font></font>

weiguoyin868

<p>系统中有这样的代码：<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("E" &amp; J + 1) = "=SUM(E" &amp; J - 19 &amp; ":E" &amp; J &amp; ")"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("F" &amp; J + 1) = "=SUM(F" &amp; J - 19 &amp; ":F" &amp; J &amp; ")"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("G" &amp; J + 1) = "=SUM(G" &amp; J - 19 &amp; ":G" &amp; J &amp; ")"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("H" &amp; J + 1) = "=SUM(H" &amp; J - 19 &amp; ":H" &amp; J &amp; ")"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("I" &amp; J + 1) = "=SUM(I" &amp; J - 19 &amp; ":I" &amp; J &amp; ")"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("J" &amp; J + 1) = "=SUM(J" &amp; J - 19 &amp; ":J" &amp; J &amp; ")"<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Range("K" &amp; J + 1) = "=SUM(K" &amp; J - 19 &amp; ":K" &amp; J &amp; ")"</p><p>这里表示对E列、E列、F列、G列、H列、I列、J列、K列进行汇总，若要汇总其他列复制添加就可以了，如添加L列，就在下面添加Range("L" &amp; J + 1) = "=SUM(L" &amp; J - 19 &amp; ":L" &amp; J &amp; ")"就可以。</p>

ljx63426

<p>谢谢您，我回去试试，不懂再向您讨教。[em04][em04]</p>

ljx63426

试了，没有成功，小计行不合计，不知何故？请楼主再赐教，谢谢！

qinhuan66

值得学习谢谢楼主的分享

anning1304

来学习　　　

神箭

做得很好！正需要这个东东呢！谢谢了！

sweet莹莹

谢谢分享了

moonchang

太好了，正是需要

zh3005

下载来学习学习!!