[第19期_2]求字符串的计位数[已总结]

山菊花

用函数作出如图所示的字符串计位数 ：

[此贴子已经被作者于2007-1-31 0:31:43编辑过]

gvntw

=SUBSTITUTE(SUM(FREQUENCY(CODE(MID(A2,ROW(OFFSET(A1,,,LEN(A2))),1)),CODE(MID(A2,ROW(OFFSET(A1,,,LEN(A2))),1)))*10^(LEN(A2)-ROW(OFFSET(A1,,,LEN(A2)+1)))),0,)

liujy

公式很长，先传上来吧，再想办法缩短。

=SUBSTITUTE(SUM(MMULT(--(MID($A2,ROW(INDIRECT("1:"&LEN(A2))),1)=MID($A2,COLUMN(INDIRECT("A2:"&ADDRESS(1,LEN(A2)))),1)),ROW(INDIRECT("1:"&LEN(A2)))^0)*(MATCH(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1),MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1),)=ROW(INDIRECT("1:"&LEN(A2))))*10^(LEN(A2)-ROW(INDIRECT("1:"&LEN(A2))))),"0","")

liujy

经过一番努力，公式长度由300多个字符缩短到191个字符，还需继续努力。

=SUBSTITUTE(SUM(MMULT(--(MID(A2,ROW(1:15),1)=MID(A2,COLUMN(A:O),1)),ROW(1:15)^0)*(MATCH(MID(A2&REPT(LEFT(A2),15-LEN(A2)),ROW(1:15),1),MID(A2,ROW(1:15),1),)=ROW(1:15))*10^(15-ROW(1:15))),"0",)

liujy

终于把公式字符控制在180个字符以内了，为165个字符：

=SUBSTITUTE(SUM((LEN(A2)-LEN(SUBSTITUTE(UPPER(A2),MID(UPPER(A2),ROW(1:15),1),)))*(MATCH(MID(A2,ROW(1:15),1),MID(A2,ROW(1:15),1),)=ROW(1:15))*10^(15-ROW(1:15))),"0",)

milan41

交卷

leeyong

碰碰运气

chat163

老师:你好!

做了下175个字符的

[em06],在想想看看能否再少些

qlz110

andysky

四个不同公式。

最后一个114个字符

[此贴子已经被作者于2007-1-22 11:11:54编辑过]