如何通过ole db命令或vba的方式将单元格汇总数据后加上名称

songtao6

请教如何通过ole db命令的方式将单元格汇总数据后加上名称  如果是vba麻烦带上注释 主要是vb看不怎么懂，函数的话数据量太大

部门	铜	钢铁	铝材
一部门	56	81	90
二部门	57	82	91
三部门	58	83	92
四部门	59	84	93
五部门	60	85	94
六部门	61	86	95
七部门	62	87	96

  将该表变为

Expr1000	部门	重量	材料名称
原表	一部门	56	铜
原表	二部门	57	铜
原表	三部门	58	铜
原表	四部门	59	铜
原表	五部门	60	铜
原表	六部门	61	铜
原表	七部门	62	铜
原表	一部门	81	钢铁
原表	二部门	82	钢铁
原表	三部门	83	钢铁
原表	四部门	84	钢铁
原表	五部门	85	钢铁
原表	六部门	86	钢铁
原表	七部门	87	钢铁
原表	一部门	90	铝材
原表	二部门	91	铝材
原表	三部门	92	铝材
原表	四部门	93	铝材
原表	五部门	94	铝材
原表	六部门	95	铝材
原表	七部门	96	铝材

的形式  
合并多工作表到一个工作表.rar (2.78 KB, 下载次数: 3)

2012-3-15 00:41 上传

点击文件名下载附件