[已解决]求助用VBA将两个文件夹中同一班的成绩分别汇总到一个表中

gavincar

见附件：
两个文件夹：第一学期 和 第二学期，分别存放在各班第一学期和第二学期的成绩。（代码在运行时最好不限制两个文件夹名，这两个文件夹名有可能叫A和B，或第1学期和第2学期），而同一班 不同学期的文件名唯一区别就是学期不同，其它都一样。
现在想将第二学期的成绩列（即从第三列开始到最后一列） 粘贴到 对应班 第一学期成绩的后面。然后另存一个新的文件名（即把第几学期去掉）到文件夹的同一级目录。如下图，非常感谢！

最佳答案

月排行榜 / 总排行榜

高

2017-9-24 13:57

现在，不管你几个科目

跳转到最佳答案楼层

高

见附件

gavincar

高 发表于 2017-9-24 10:03
见附件

合并出来结果有点问题，科目之间有空列。另外，科目的数量不定，不一定就3列或4列。

高

现在，不管你几个科目

gavincar

高 发表于 2017-9-24 13:57
现在，不管你几个科目

谢谢，这次可以了。请问第一次代码中里面有一句：Range("C1:G" & Range("c1").End(xlDown)).Copy
是不是省略了一个row吗？
Range("C1:G" & Range("c1").End(xlDown).row).Copy

高

是，但是我不是故意的，也不知道省略了还能用。

gavincar

高 发表于 2017-9-24 14:31
是，但是我不是故意的，也不知道省略了还能用。

应该不是省略，是正好对应的单元格是数字，如果是文本，可能会出错。

高

gavincar 发表于 2017-9-24 15:02
应该不是省略，是正好对应的单元格是数字，如果是文本，可能会出错。

有道理