1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码,然后运行
Function SumN(rng As Range, N As Byte)
Dim cell As Range
For Each cell In rng
If cell >=WorksheetFunction.Large(rng, N) Then SumN=SumN+cell
Next cell
End Function

5、在单元格C13中输入公式“=SumN(B3:B12,3)”即可返回结果292
