excel表格中vb函数问题

整合多张excel表格，必须傻瓜式简单

部分vb代码已写，现在就是如何把图1中标黄色部分的代码添加到原有代码中

傻瓜式运行，不需要每次去修改代码

统计不同类型的表格，不可能每次都去修改代码，就像通过输入方式，直接整合。

图1

百度网盘链接：https://pan.baidu.com/s/1UXbQhorQNPz_FT2RZ9Gbsw?pwd=chf4%EF%BC%8C

提取码：chf4

标题行是只保留一个吗？

这个我可以给你看看