[讨论]谁的代码最短

xcd

QUOTE:

以下是引用chrisfang在2008-9-18 10:43:00的发言：

60字符：

=MID(A1,ABS(SUM(MOD(0&LEFT(A1,{1,2,3}),2)*{4,2,1})-3.5)+1,1)

压缩公式的手段“令人发指”，很恐怖，没得说，只有加分！

我的嗅公式97字符，也贴出来交流一下

=LOOKUP("々",IF(MODE(MOD(0&LEFT(A1,{1,2,3}),2))-MOD(LEFT(A1+1%,{9,1,2,3}),2),MID(A1,{4,1,2,3},1)))

syz105729913

QUOTE:

以下是引用chrisfang在2008-9-18 10:43:00的发言：

60字符：

=MID(A1,ABS(SUM(MOD(0&LEFT(A1,{1,2,3}),2)*{4,2,1})-3.5)+1,1)

惊叹不已，本来以为TEXT那个最短了，送花一朵

[em23]

wddn

QUOTE:

以下是引用chrisfang在2008-9-18 10:43:00的发言：

60字符：

=MID(A1,ABS(SUM(MOD(0&LEFT(A1,{1,2,3}),2)*{4,2,1})-3.5)+1,1)

难以置信！！！

hncd

不愧为才子榜第一名,公式真是鬼斧神工.

wddn

QUOTE:

以下是引用chrisfang在2008-9-18 10:43:00的发言：

60字符：

=MID(A1,ABS(SUM(MOD(0&LEFT(A1,{1,2,3}),2)*{4,2,1})-3.5)+1,1)

可能改坏了，58字符：

=MID(A1,ABS(SUM(MOD(LEFT(A1&0,{1,2,3}),2)*{3,2,1})-3)+1,1)

icongmu

QUOTE:

以下是引用wddn在2008-9-18 16:06:00的发言：

可能改坏了，58字符：

=MID(A1,ABS(SUM(MOD(LEFT(A1&0,{1,2,3}),2)*{3,2,1})-3)+1,1)

经我检测还没发现错误呢~~58了  unbeliveable!

我怎么没有发现有个用TEXT的呀？

chrisfang

QUOTE:

以下是引用wddn在2008-9-18 16:06:00的发言：

可能改坏了，58字符：

=MID(A1,ABS(SUM(MOD(LEFT(A1&0,{1,2,3}),2)*{3,2,1})-3)+1,1)

举一反三改的不错。

再减两字符，56字符：

=MID(A1,ABS(SUM(MOD(LEFT(A1&0,{1,2,3}),2)*{5,2,1})-4),1)

chrisfang

19楼的公式现在只能算作一个精简的半成品了，不过这个半成品放在那里我觉得还是比较有意义的，因为mid函数非整数参数的用法好像很少见到。

kartbird

借用wshcw的公式简化的(98个字符):

=MID(A1,MATCH(--NOT(MODE(MOD(MID(A1,{1,2,3},1),2))),MOD(MID(A1&MOD(A1+1,2),{1,2,3,4},1),2),),1)

(不好意思啦,看不懂后面超短公式,就改前面容易理解的.-----高手们请见谅)

[此贴子已经被作者于2008-9-18 20:20:14编辑过]

fdd

短有何用？高效即可！

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