将相关信息存入二维数组arr（n,m）（n表示sheet数，m表示该sheet下b列含值行数），最后将数组导出就可以了,最后张sheet是你的汇总表
dim arr()
for n = 1 to thisworkbook.worksheets.count -1
for m = 1 to thisworkbook.worksheets(n).userange.rows.count
arr(n,m) = 。。。
不明白“A列第2行往下初始值都为空，根据内容选择填写（比如写数字1）”。。。
思路就这个思路，自己整整吧
代码需要沟通确定要求。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024