作者：乔山办公网日期：
返回目录：excel表格制作
使用large函数处理
Excel版本参考：2010
测试A列中前三大值
1、C1输入公式：=LARGE(A:A,ROW(A1))
2、回车，下拉公式到C3
3、查看效果
2007的是1048576行、16384列
可以百用VBA来实现，代码如下（具体字体、字号根据需要修改）：
Sub main()
For i = 1 To Range("A1").End(xlDown).Row'取A列最大行数
With Cells(i, 1).Font'获得单元格字体属性度
If .Name = "黑体" And .Size = 10 Then‘如问果字体是黑体10号答
k = k + 1
Cells(i, 1).Copy Cells(k, 3)’把这个单元格依次复制到C列
ElseIf .Name = "宋体" And .Size = 12 Then‘如果字体是宋体12号
m = m + 1
Cells(i, 1).Copy Cells(m, 4)’把这个单元格依次复制到D列
End If
End With
Next i
End Sub
实现步骤版如下：
1.数据源
2.Alt+F11，选择Sheet1，复制上述代码
3.点击运行，或者按F5，关闭VBA，返回工作权表，结果如下：
我用辅助知软件合并多个工作表，有时因为各工作表的格式不完全相同，合并后的表里会有空白行，那么筛选时，只能筛选到第一个空白行以上的内容。
假设你的数据在道A至F列，第一行是标题行。
在G1里输入1，然后选中这个G1单元格，在“开始”选项卡中找到“填充”→“系列”，在找开的小窗口中选“回序列产生在‘列’”，“终止值”里填5000（假设你的数据少于5000行），确定；
关掉你原来的筛选答状态，选中第一行重新使用筛选。
如果现在1000行以后还不可筛选，那就不是空白行引起的了，我目前也没遇到过，无能为力了。