查找数据-对比两表-复制数据再新建表

hrduan268

1、汇总表已分类汇总好，查找含有“汇总”字样的单元格，找到后利用函数a=left(F4,len(f4)-3)截取字符串，即不要“空格+汇总”。找到当前单元格，可用=left(cells.acitve,len(cells.acitve)-3）？记录“汇总”单元格左边的合计金额。
2、截取后的字符串，去对照表中查找，如有则记录部门代码、段位1、段位2。
3、新建一个表名为总计金额，如汇总表总计左边为4323，即4323.xls，把找到的合计金额、部门代码、段位1、段位2放到新表中，如模板所示。模板其他数据是固定的，只有红色地方是有变化的。继续查找，直至汇总表查完含有”汇总“的单元格，并把找到数据放到新表中，注意其他部门段、默认1等也要加上固定数据。
代码如何写比较好，有部份功能不熟悉。

hrduan268

求一段代码观摩学习。

hrduan268

不要沉下去，求解。