多表合并

richuanchq

将各班人员成绩汇总到一张汇总表上，人员姓名前要加上所属班级名称。示例班级少，实际比较多。

abc123281

要求不明白   最好能自己制作一张想达到的效果表

VBA萌新

Sub 多张工作表汇总()
Dim i As Integer
Range("A2:D2") = Array("序列", "姓名", "语文", "数学")
For i = 1 To Worksheets.Count - 1
Worksheets(i).Range("A3:D6").Copy Range("A65536").End(xlUp).Offset(1, 0)
Next i
End Sub