如何在excel的应用中写前三名

来源：百度知道 编辑：UC知道 时间：2024/09/28 10:58:03
比如 排序有100个股价,我需要提取前三名 该怎么写?怎么提取?

假定原数据在A列,在B1输入如下公式:
=LARGE(A:A,ROW())
用填充柄将公式向下复制就行了，随你要前几个都可以。

Sub Select()
'
'数据从第一行第一列到第一0一行第一列
'按降序排列，前三个数据存放到底二列的依次位置
'

Range(Cells(1, 1), Cells(101, 1)).Select
Selection.Sort key1:=Range(Cells(1, 1), Cells(1, 1)), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
Dim i As Integer
For i = 1 To 3
Cells(i, 2) = Cells(i, 1)
Next i
End Sub

数据---筛选--自动筛选，点击单元格右侧三角按钮，里面有一个“前10个”，单击。在弹出的对话框中，显示最大值 输入3就可以了。