Excel精英培训网

 找回密码
 注册

QQ登录

只需一步,快速开始

你正在寻找更好的Excel学习教程吗?Excel技巧80集+数据透视表+函数初中高全套+VBA80集,想学的这儿全都有
查看: 5148|回复: 40

【字符争霸】第14期:返回绝对值最大的整数[开贴]

[复制链接]
发表于 2014-9-25 19:48 | 显示全部楼层 |阅读模式
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
本帖最后由 笨笨四 于 2014-10-23 09:40 编辑


         您还在抱怨论坛的竞赛之题太少吗?
        你还在惆怅自己的功力不能展示吗?
来参加字符争霸吧!
秀出你的高端!秀出你的大气!
展示你的奢华!再现你的魅力!
Let’s go!


字符争霸第14期:返回绝对值最大的整数
1.要求:纯函数题,谢绝技巧和vba,具体要求见附件。
2.赛题难度指数:中级。
3.答题截止时间:2014年10月20日18:00
4.请勿重复占楼!!!!
5.补充:如果绝对值最大有两个,任取一个都可以。
本期霸主:6楼,太阳之子,37楼,滴答滴。
字符数:45
第13期字符争霸链接:http://www.excelpx.com/thread-330441-1-1.html
强中自有强中手,能人背后有能人。相信你,本期霸主就是你!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

评分

参与人数 5 +114 金币 +90 收起 理由
孤单无所谓 + 30 + 30 赞一个!
神隐汀渚 + 3 为什么是小暖
风林火山 + 30 + 30 小暖辛苦了
1091126096 + 21 赞一个!
顺⑦.zì繎。 + 30 赞一个!

查看全部评分

 楼主| 发表于 2014-9-25 19:49 | 显示全部楼层
本帖最后由 笨笨四 于 2014-10-23 09:24 编辑

结贴:
本期竞赛得到众多E师E友的大力支持,首先衷心表示感谢。
这次赛题不算太难,思路就是判断是否为整数,判断绝对值是否最大,然后得出结果。
题目的核心在于判断是否为整数,思路很多,尤以两位霸主的思路最为精彩,值得回味。
有部分E友只判断了最大,而忽略了是否为整数,也有部分E友用SUM,而忽略了如果有多个最大值或两个最大值互为相反数的情况。
若有点评错误,敬请指正。
再次感谢大家!




回复

使用道具 举报

发表于 2014-9-25 20:28 | 显示全部楼层
本帖最后由 baksy 于 2014-10-9 16:16 编辑

数组公式;
=INDEX(A:A,MIN(IF(ABS(A2:A7)=MAX(ABS((MOD(A2:A7,1)=0)*A2:A7)),ROW(2:7))))

评分

参与人数 1 +10 金币 +10 收起 理由
笨笨四 + 10 + 10 赞一个!

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 21:07 | 显示全部楼层
本帖最后由 瑾瑄 于 2014-9-28 15:58 编辑

=OFFSET(A1,MATCH(MAX(((INT(A2:A7)=A2:A7)*A2:A7)^2),((INT(A2:A7)=A2:A7)*A2:A7)^2,),)
=INDEX(A:A,RIGHT(MAX(10*(MOD(A2:A7,1)=0)*A2:A7^2+ROW(A2:A7))))
=SUM(A2:A7*(MAX((MOD(A2:A7,1)=0)*A2:A7^2)=A2:A7^2))



点评

SUM公式有误,如最大值有两个时。  发表于 2014-10-22 08:06

评分

参与人数 1 +5 金币 +5 收起 理由
笨笨四 + 5 + 5

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 21:32 | 显示全部楼层
本帖最后由 gdpgdp317 于 2014-9-28 18:28 编辑

数组公式:=IF(ABS(MIN(IF(MOD(A2:A7,1)=0,A2:A7)))>ABS(MAX(IF(MOD(A2:A7,1)=0,A2:A7))),MIN(IF(MOD(A2:A7,1)=0,A2:A7)),MAX(IF(MOD(A2:A7,1)=0,A2:A7)))
只是参与

稍微简化下:
=IF(ABS(MIN(IF(MOD(A2:A7,1),,A2:A7)))>ABS(MAX(IF(MOD(A2:A7,1),,A2:A7))),MIN(IF(MOD(A2:A7,1),,A2:A7)),MAX(IF(MOD(A2:A7,1),,A2:A7)))

再次改进:
=INDEX((-1)^ROW(1:41)*INT(ROW(1:41)/2),MAX(IFERROR(MATCH(A2:A7,(-1)^ROW(1:41)*INT(ROW(1:41)/2),0),"")))

再减几字,终于少于100了

=INDEX((-1)^ROW(1:41)*INT(ROW(1:41)/2),MAX(IFERROR(MATCH(A2:A7,(-1)^ROW(1:41)*INT(ROW(1:41)/2),),)))

评分

参与人数 1 +10 金币 +10 收起 理由
笨笨四 + 10 + 10 赞一个!

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 21:39 | 显示全部楼层
本帖最后由 1091126096 于 2014-10-7 16:41 编辑

公式3有问题,当一对相反数为绝对值最大时返回0
公式5,45字符。
  1. =VLOOKUP(MAX((MOD(A2:A7,1)=0)*A2:A7^2),(A2:A7)^{2,1},2,)
  2. =MAX(IF(MAX((MOD(A2:A7,1)=0)*A2:A7^2)=A2:A7^2,A2:A7))
  3. =SUM((MAX((MOD(A2:A7,1)=0)*A2:A7^2)=A2:A7^2)*A2:A7)
  4. =INDEX(A:A,MOD(MAX((A2:A7&90)^2+ROW(2:7)),10))
  5. =INDEX(A:A,RIGHT(MAX(ABS(A2:A7&ROW(92:97)))))
复制代码

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x

点评

精彩思路,精彩公式,本期霸主,+30BB,+30JY  发表于 2014-10-23 09:06

评分

参与人数 4 +66 金币 +30 收起 理由
948621651 + 3 很给力!
hsl215 + 9 很给力!
baksy + 24 恭喜!
笨笨四 + 30 + 30 赞一个!

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 21:50 | 显示全部楼层
本帖最后由 尛ぃ謉 于 2014-9-25 21:52 编辑
  1. =OFFSET(A1,LOOKUP(9,MATCH(ROW(A:A)-1,ABS(A2:A7),)),)
复制代码
``

点评

优秀作品,+20BB,+20JY  发表于 2014-10-23 09:07

评分

参与人数 1 +20 金币 +20 收起 理由
笨笨四 + 20 + 20 赞一个!

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 21:54 | 显示全部楼层
本帖最后由 A梦-Doraemon 于 2014-9-26 08:33 编辑
  1. <span style="line-height: 1.5;">=INDEX(A2:A7,MATCH(MAX(ABS(IF(ISERROR(FIND(".",A2:A7,1)),A2:A7))),ABS(A2:A7),0))</span>
复制代码

评分

参与人数 1 +10 金币 +10 收起 理由
笨笨四 + 10 + 10 赞一个!

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 22:15 | 显示全部楼层
=INDIRECT("a"&MATCH(MAX(ABS((INT(A2:A7)=A2:A7)*A2:A7)),ABS(A2:A7),)+1)
=INDEX(A2:A7,MATCH(MAX(ABS((INT(A2:A7)=A2:A7)*A2:A7)),ABS(A2:A7),))

评分

参与人数 1 +10 金币 +10 收起 理由
笨笨四 + 10 + 10 赞一个!

查看全部评分

回复

使用道具 举报

发表于 2014-9-25 22:58 | 显示全部楼层
本帖最后由 xdragon 于 2014-9-25 23:00 编辑
  1. =INDEX(A2:A7,MATCH(MAX((FIND(".",A2:A7&".")>LEN(A2:A7))*ABS(A2:A7)),IF(FIND(".",A2:A7&".")>LEN(A2:A7),ABS(A2:A7),)))
复制代码
东凑凑西拼拼就出来了,虽然很长

评分

参与人数 1 +10 金币 +10 收起 理由
笨笨四 + 10 + 10 赞一个!

查看全部评分

回复

使用道具 举报

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

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2019-9-16 23:21 , Processed in 0.078001 second(s), 6 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表