Microsoft技术社区联盟成员,全球领先的Excel门户,Office培训学习的最佳社区
加关注|繁體中文 切换到窄版

ExcelHome技术论坛

 找回密码
 免费注册

用新浪微博连接

一步搞定

QQ登录

只需一步,快速开始

魔方网表,Excel终结者,永久免费 Excel服务器学习和下载-做管理系统 Excel Home官方微博精品教程库
Excel不给力? 何不试试FoxTable! 2014年下半年Excel免费培训班计划 前所未见,90集Excel2010视频教程公开 免费下载Excel行业应用视频教程
Excel 2007表格基本操作秘技 免费学习Word 2007实战技巧视频 从菜鸟到经理,Excel职场秘笈公开 最权威、易懂的VBA学习宝典
超级强悍, 无比易用的 Excel 工具集 你的Excel 2010函数公式学习锦囊 欲罢不能, 过目难忘的 Office 新界面 免费的Excel考勤计算系统

如何求第二大值?

查看: 975|回复: 8| 收藏 :1
17f
  • 744财富
  • 0鲜花
  • 0技术
    • 等级 2EH初级
    积分排行
    3000+
    帖子
    204
    精华
    0
    微积分
    0
    发表于 2012-10-22 19:28:24 |显示全部楼层
    分享到:

    如何求第二大值? [复制链接]

    在不筛选的情况下如何求出下列数值中的第二大值,
    1  1  2  3   4 4   5 5
    如果只用large(a1:h1,row(a2)),只能求到是5,我要的是4,如何能实现?同样求第二小值也是一样,用small()只能求到1,如何能找到是2?要嵌入哪个函数?
  • 87863财富
  • 2869鲜花
  • 6技术
  • 积分排行
    7
    帖子
    25294
    精华
    0
    微积分
    0

    大侠勋章 金牌优秀管理者 优秀管理者 优秀管理者 优秀管理者 金牌优秀会员 优秀会员

    发表于 2012-10-22 19:43:48 |显示全部楼层
    =MAX((A1:H1<>MAX(A1:H1))*A1:H1)数组公式
  • 3857财富
  • 98鲜花
  • 0技术
    • 等级 4EH高级
    积分排行
    766
    帖子
    1337
    精华
    0
    微积分
    0
    发表于 2012-10-22 19:45:58 |显示全部楼层
    本帖最后由 hdn1000 于 2012-10-22 20:01 编辑

    =LARGE(IF(MATCH(A1:H1,A1:H1)=COLUMN(A1:H1),A1:H1),2)
  • 5063财富
  • 2鲜花
  • 0技术
    • 等级 5EH铁杆
    积分排行
    493
    帖子
    1515
    精华
    0
    微积分
    0
    发表于 2012-10-22 19:54:11 |显示全部楼层
    本帖最后由 tonyibm 于 2012-10-22 19:56 编辑

    {=LARGE(IF(MATCH(A1:H1,A1:H1,0)=COLUMN(A1:H1)=TRUE,A1:H1,""),2)}


  • 4159财富
  • 61鲜花
  • 0技术
    • 等级 4EH高级
    积分排行
    896
    帖子
    1167
    精华
    0
    微积分
    0
    发表于 2012-10-22 19:54:17 |显示全部楼层
    {=MAX(IF(A1:A8<>MAX(A1:A8),A1:A8,))}
    17f
  • 744财富
  • 0鲜花
  • 0技术
    • 等级 2EH初级
    积分排行
    3000+
    帖子
    204
    精华
    0
    微积分
    0
    发表于 2012-10-22 20:02:05 |显示全部楼层
    谢谢以上各位的回答
  • 10734财富
  • 470鲜花
  • 4技术
    • 等级 6EH能手
    积分排行
    208
    昵称
    小小军
    帖子
    4222
    精华
    1
    微积分
    0

    最佳会员 优秀会员

    发表于 2012-10-22 20:12:20 |显示全部楼层
    1. =LARGE(IF(MATCH(A1:G1,A1:G1,)=COLUMN(A1:G1),A1:G1),2)
    复制代码
    数组公式
  • 339财富
  • 0鲜花
  • 0技术
    • 等级 2EH初级
    积分排行
    3000+
    帖子
    84
    精华
    0
    微积分
    0
    发表于 2012-10-22 20:25:30 |显示全部楼层
    理解起数组公式来有点难度
  • 7599财富
  • 203鲜花
  • 1技术
    • 等级 5EH铁杆
    积分排行
    323
    帖子
    2921
    精华
    0
    微积分
    0

    优秀会员

    发表于 2012-10-22 20:36:09 |显示全部楼层
    本帖最后由 提苏米拉啦 于 2012-10-22 20:36 编辑
    1. Function qqq(aa, i)
    2. Set d = CreateObject("scripting.dictionary")
    3. For k = 1 To UBound(aa.Value, 2)
    4. d(aa(1, k)) = ""
    5. Next k
    6. If i = 1 Then
    7. qqq = Application.Small(d.keys, 2)
    8. Else
    9. qqq = Application.Large(d.keys, 2)
    10. End If
    11. End Function
    复制代码
    继续高射炮打蚊子

    123.rar

    8.13 KB, 下载次数: 5

    =MID(“壹佰叁拾壹万肆仟伍佰贰拾零”,ROW(A1:A7)*2-1,1)

    发表回复

    您需要登录后才可以回帖 登录 | 免费注册

    发帖时请遵守我国法律,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任。
    关闭

    最新热点

    关于发帖要求邮箱认证的说明
    - 注意:自2014/8/1起,未完成邮箱认证的会员将无法发帖!
    如何完成邮箱认证?请点击下方“查看”。

    查看 »

    回顶部