VBA汇总表生成

qiminger

VBA汇总表生成EXCEL2013
学习编制，代码丑陋，无加密。
2 ?% c) f0 b) B4 ]* l4 B7 z% l有优化、增加功能和好方法的朋友，请共享学习。
* J1 n2 E' n: x' t4 P: d1 N- ?0 Z操作步骤：
1，在【明细汇总】表中，粘贴需制表的数据。
2，在【设置】表中，进行表类型（零部件明细表、标准件表、图样目录等）的相关设置。
3、转到【审表打印】，点击【重新填充数据】，即可生成在设置中的相关类型表格，并添充【明细汇总】表中的数据。
以下预览，动画图片受文件大小限制，不太清晰。 汇总表生成.rar (62.59 KB, 下载次数: 45)

2018-1-20 10:32 上传

点击文件名下载附件


1 E/ @  _% v. B

草原_PVzuV

正打算学习vba，看看

byrhxj

看着还不错，结合模型数据自动输出填充会更好，自动化程度也更高

solo六线谱

谢谢楼主分享

qiminger

byrhxj 发表于 2018-1-28 12:51
看着还不错，结合模型数据自动输出填充会更好，自动化程度也更高

9 L4 Z# E4 L9 f" O" w1 e+ Q) A用前序程序提取所有文件属性数据，输入这个模板表一后，
  Q) b) |+ ]$ d/ a前序程序执行表中VBA
xlApp.Run "生成表格"
3 T. x# G0 m. F' vxlApp.Run "重新添充"
即可自动化了。

念天悠

好东东，值得分享。

lhl2008

很好的一个工具，如果将数据另外生成一个表格，不要在本表中覆盖，会更好！