Excel中如何按条件生成新表？

Excel中按条件生成新表的方法是：
1、打开要处理的excel文档，
2、按alt+f11，打开vba编辑窗口，
3、双击左侧的this sheet,
4、在右侧的空白中输入下面的程序

Sub liyoushang()
Sheets(Sheets.Count).Cells.ClearContents
k = 1
For i = 1 To Sheets.Count - 1
For j = 1 To Sheets(i).Range("a6000").End(xlUp).Row
If WorksheetFunction.Trim(Sheets(i).Cells(j, 2).Text) = "B" Then 'B指公司名称，在此做相应替换
Sheets(i).Rows(j).Copy _
Destination:=Sheets(Sheets.Count).Cells(k, 1)
k = k + 1
End If
Next
Next
End Sub
5、点击工具栏中的执行，
这样就可以了。

A考表的A2单元格中输入:
=index(A班!B:B,small(if(A班!$E$6:$E$21="*",row($6:$21),4^8),row(1:1)))&""
按Ctrl+Shift+回车键结束。
往下复制公式即可

可以先把excel的那个班级的表格先排好序，然后运用excel的查找函数查找出姓名学号等信息，进而做出一个新的表。