[开_123][已结]面额统计终极版，挑战最短纪录吧!

sunya_0529

题目要求见附件GIF动画，如有表述不当之处，欢迎大家指正。

本题的背景是企业以现金发工资时，需要根据金额确定需要多少不同面额的钞票，尽管现在大部分公司已经通过银行代发，不需要数钱了，但这个题目就当是给大家娱乐一下吧。本人有粗劣的解法，想看看各路高手有没有更短小精悍的思路，期待中……

目前最短纪录（总结帖）：本帖第14楼
纪录创造者：wangg913
D5， 数组公式，134字符
D19，数组公式， 57字符
             wshcw版主提供了D19的精简公式，53字符，详见本帖18楼

[ 本帖最后由 sunya_0529 于 2010-8-19 10:11 编辑 ]

sclzah

我也做了个，能达到你的要求，但是感觉太繁琐，请各位指正

sunya_0529

兄台速度够快的，不过“钞票张数”里的公式不是一次成型的（即一个公式搞定），继续加油！

gdfcx

D5单元格数组公式长229字符：
=IF(C5="","",INT(TEXT(D$2-SUM(TEXT(IF(C$4:C4="",,LEFT(C$4:C4,LEN(C$4:C4)-1)),"0;;0;!0")*CHOOSE(FIND(RIGHT(C$4:C4),"元角分择"),1,0.1,0.01,1)*TEXT(D$4:D4,"0;;0;!0")),"0%")/(LEFT(C5,LEN(C5)-1)*CHOOSE(FIND(RIGHT(C5),"元角分"),1,0.1,0.01))))

D19单元格数组公式长115字符：
=SUM(IF(C5:C17="",,LEFT(C5:C17,LEN(C5:C17)-1))*CHOOSE(FIND(RIGHT(C5:C17),"元角分"),1,0.1,0.01)*TEXT(D5:D17,"0;;0;!0"))

[ 本帖最后由 gdfcx 于 2010-8-5 09:20 编辑 ]

sunya_0529

原帖由 gdfcx 于 2010-8-5 09:08 发表
D5单元格数组公式长229字符：
=IF(C5="","",INT(TEXT(D$2-SUM(TEXT(IF(C$4:C4="",,LEFT(C$4:C4,LEN(C$4:C4)-1)),"0;;0;!0")*CHOOSE(FIND(RIGHT(C$4:C4),"元角分择"),1,0.1,0.01,1)*TEXT(D$4:D4,"0;;0;!0")),"0%")/( ...

学习兄台的思路，我的公式与你大同小异，在数值处理上，CHOOSE(FIND())的思路很巧妙。

我的公式，D5数组公式长226，D19普通公式长106

我们一起期待其他精彩的解法吧:)

gdfcx

实在是想不出好着了，暂缩减到225个字符：
=IF(C5="","",INT(TEXT(D$2-SUM(IF(ISERR(--LEFT(C$4:C4)),,LEFT(C$4:C4,LEN(C$4:C4)-1))*CHOOSE(FIND(RIGHT(C$4:C4),"元角分择"),1,0.1,0.01,1)*TEXT(D$4:D4,"0;;0;!0")),"0%")/(LEFT(C5,LEN(C5)-1)*CHOOSE(FIND(RIGHT(C5),"元角分"),1,0.1,0.01))))

wangg913

=IF(C5="","",INT((D$2/1%-SUM(TEXT(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(C$4:C4,"元",0&0),"角",0),"分",),"0;;;!0")*TEXT(D$4:D4,"0;;0;!0")))/LEFT(C5,LEN(C5)-1)%/10^FIND(RIGHT(C5)," 分角元")))

[ 本帖最后由 wangg913 于 2010-8-5 17:33 编辑 ]

wangg913

=IF(C5="","",INT((D$2/1%-SUM(LARGE({1;2;5}*10^{0,1,2,3,4},ROW($2:2))*TEXT(D$4:D4,"0;;0;!0")))/LARGE({1;2;5}*10^{0,1,2,3,4},ROW(A3))))

wangg913

=IF(C5="","",INT((D$2/1%-SUM(LARGE({1;2;5}*10^{0,1,2,3,4},ROW($2:2))*IF(D$4:D4<"",D$4:D4)))/LARGE({1;2;5}*10^{0,1,2,3,4},ROW(A3))))

D19=SUM(LARGE({1;2;5}*10^{0,1,2,3,4},ROW(3:15))*(0&D5:D17))%
数组公式。

[ 本帖最后由 wangg913 于 2010-8-6 07:01 编辑 ]

sunya_0529

怎一个“赞”字了得，曾经以为大头兄的第一个公式就是最短的了，没想到还有更精妙的思路，彻底服了！

顶起来，让更多的人研究学习一下这个数组运算的思路，谢谢大头！！