[讨论]谁的代码最短

wkbu

bily_dai

肯定是3位数吗？

如果是n位数，可能存在多个奇数和偶数，难道要提取奇偶中少的吗？

wkbu

只有三位数，此贴的目的主要是想交流一下用各种函数解决此问题的方法，我发现有很多种函数的组合都可以解决，但代码都比较长，所以想到此与各位交流一下，共同学习。

_s_bri

=INDEX(MID(A1,ROW($1:$3),1),MATCH(IF(MODE(MOD(MID(A1,ROW($1:$3),1),2))=0,1,),MOD(MID(A1,ROW($1:$3),1),2),))  数组公式  条件格式屏蔽错误值!

[此贴子已经被作者于2008-9-20 11:59:36编辑过]

wddn

建议楼主：

制作一附件，制订一长度可接受值。

初步编写，142字符。

[此贴子已经被作者于2008-9-17 23:26:09编辑过]

wshcw

QUOTE:

以下是引用_s_bri在2008-9-17 22:52:00的发言：
=INDEX(MID(A1,ROW($1:$3),1),MATCH(IF(MODE(MOD(MID(A1,ROW($1:$3),1),2))=0,1,),MOD(MID(A1,ROW($1:$3),1),2),))  数组公式

三个奇或三个偶数时出错.

icongmu

QUOTE:

以下是引用wshcw在2008-9-17 23:54:00的发言：

三个奇或三个偶数时出错.

黄老师将ROW改为{1,2,3}可以省到百字以内，呵呵，先占个位子学习吧

=MID(A1,MATCH(IF(MODE(MOD(MID(A1,{1,2,3},1),2))=0,1,),MOD(MID(A1,{1,2,3},1),2),),1)

[此贴子已经被作者于2008-9-18 0:17:19编辑过]

wshcw

写了个130字符的,请大家指正并简化:

=IF(MOD(SUM(-(MOD(MID(A1,{1,2,3},1),2)=1)),3),MID(A1,MATCH(ABS(MODE(MOD(MID(A1,{1,2,3},1),2))-1),MOD(MID(A1,{1,2,3},1),2),),1),"")

WdVtzbBO.rar (1.71 KB, 下载次数: 6)

2008-9-18 00:36 上传

点击文件名下载附件

[此贴子已经被作者于2008-9-18 0:36:48编辑过]

wshcw

QUOTE:

以下是引用icongmu在2008-9-18 0:03:00的发言：

黄老师将ROW改为{1,2,3}可以省到百字以内，呵呵，先占个位子学习吧

=MID(A1,MATCH(IF(MODE(MOD(MID(A1,{1,2,3},1),2))=0,1,),MOD(MID(A1,{1,2,3},1),2),),1)

师兄啊,我是刚来这里学习不久的,老师不敢当呀!

hhb6085

因结果与前面撞车.自己删除.

[此贴子已经被作者于2008-9-18 1:12:54编辑过]