EXCEL高手请进：如何根据学生信息，按班级设置打印？

Sub 复制新表()
ApplicationScreenUpdating = False
Dim arr()
tr = 1
Dim i, j, k
For i = 2 To Sheets("班主任信息")Range("A65536")End(xlUp)Row
Sheets("打印表")Rows("7:65536")Select
SelectionDelete Shift:=xlUp
tr = 1
rr = Sheets("学生信息汇总")Range("A65536")End(xlUp)Row
ReDim arr(1 To rr, 1 To 16)
For j = 4 To Sheets("学生信息汇总")Range("A65536")End(xlUp)Row
If Sheets("学生信息汇总")Cells(j, 2) & Sheets("学生信息汇总")Cells(j, 3) & _
Sheets("学生信息汇总")Cells(j, 4) = Sheets("班主任信息")Cells(i, 1) & Sheets("班主任信息")Cells(i, 2) & Sheets("班主任信息")Cells(i, 3) Then
For c = 1 To 16
arr(tr, c) = Sheets("学生信息汇总")Cells(j, c)
Next
tr = tr + 1
End If
Next j
Sheets("打印表")[a7]Resize(tr, 16) = arr
Sheets("打印表")Range("A3") = "思茅区倚象镇" & Sheets("班主任信息")Cells(i, 5) & "村委会"
Sheets("打印表")Range("K3") = "倚象镇" & Sheets("班主任信息")Cells(i, 1)
……
……
……
详细代码，传给你。

你的要求太笼统，而且这些起码要使用对应的系统将原始数据录入，经过程序处理后才能将数据自动生成，要实现这个？花费的人力物力和金钱比起你用手动排序粘贴要多很多，当然如果你们学校有远见，直接上一套类似教务系统方面的东西也是可以的

花名册指旧时登录户口册子，在现代语言中，人们普遍称其为点名册，逐步取代旧称花名册。“花名册”的由来为旧时登录户口的册子，把人名叫做“花名”，户叫做“花户”。

“花名册”释义如下：

1、记载合格的或适于某种特殊目的或服务的人员名册。

2、特指军队或船队的官兵名册。

3、人员名册。“花名”就是“绰号”的意思。

扩展资料

花名册内容

1、劳动者的基本信息，包括劳动者的姓名、性别、公民身份z号码、户籍地址及现住址；

2、用工形式，包括全日制用工、非全日制用工、劳务派遣等；

3、用工起始时间，即劳动者实际提供劳动的时间。

4、劳动合同期限，包括固定期限、无固定期限或者以完成一定工作任务为期限。

除上述内容以外，用人单位职工名册还可以记载与用人单位或者职工有关的其他一些内容。为免发生争议和防止用人单位造假, 职工名册应有劳动者的签名确认。

参考资料来源：百度百科-职工花名册

参考资料来源：百度百科-花名册

全国学前教育管理信息系统的花名册打印，首先登录系统，点击“学生管理”，然后点击“班级学生信息”，在班级学生信息中，点击“打印花名册”，系统会根据班级学生信息自动生成花名册，并将其保存在本地，然后可以使用打印机打印出来。

---