论文数据筛选>70%

用公式IF,=IF(A1>=70,IF(A1<=80,1,0),0)在70-80间，为1, 否则为0

工具拦 数据-----筛选-------自动筛选

菜单栏“数据”→“自动筛选”→“自定义”→“大于或等于”(70)→“小于或等于”(80)

截前5位筛选

如果数据是顺序记录的,高级筛选即可 我用50W条数据测试耗时1秒C1留空,C2输入 =minute(a2)<>minute(a3)数据>筛选>高级筛选列表区域 A:B条件区域 C1:C2复制到 D1确定后即可得到结果

Sub aa()Dim a As IntegerDim b As IntegerDim i As IntegerDim e As StringDim f As StringAScreenUpdating = FalseADisplayAlerts = Falsec = [a65536]End(xlUp)RowFor i = 2 To c - 1e = Cells(i, 1)f = Cells(i + 1, 1)a =right(e, 2)b = right(f, 2)If a > b ThenRange(Cells(i, 1), Cells(i, 2))SelectSCopySheets("表2")Selectd = [a65536]End(xlUp)RowCells(d + 1, 1)SelectActiveSPaste Sheets("表1")SelectEnd IfNextEnd Sub初学者  请查收 不行的话 在HI我