会计金额问题,数字转换成大写错误,急急急...

alzeng

自定义大写金额3.rar (22.16 KB, 下载次数: 45)

2009-8-14 13:51 上传

点击文件名下载附件

wshcw

参考:
分享:目前最简短的人民币金额大写公式： [精品]
72楼公式:
=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;整"),),"零角",IF(A1^2<1,,"零")),"万",IF(AND(MOD(ABS(A1%),1000)<100,MOD(ABS(A1%),1000)>=10),"万零","万")),"零分","整")

jsrccb502803

原帖由 hyfgb 于 2009-8-13 18:21 发表
我们这小地方的银行比较垃圾,必须按照他们的要求填写,
所以请高手们想想办法,先谢谢了

人民银行在《正确填写票据和结算凭证的基本规定》中明确规定了阿拉伯金额数字万位和元位是"0"，或者数字中间连续有几个"0"，万位、元位也是"0"，但千位、角位不是"0"时，中文大写金额中可以只写一个零字，也可以不写"零"字。如￥1680.32，应写成人民币壹仟陆佰捌拾元零叁角贰分，或者写成人民币壹仟陆佰捌拾元叁角贰分，又如￥107000.53，应写成人民币壹拾万柒仟元零伍角叁分，或者写成人民币壹拾万零柒仟元伍角叁分。应建议银行工作人员重新学习一下人民银行的《正确填写票据和结算凭证的基本规定》，在工作中灵活运用。

式中B20单元格是小写数字。
=IF(B20<0,"负","")&IF(B20=0,"",IF(ABS(B20)<0.995,"",IF(AND(RIGHT(INT(ROUND(ABS(B20),2)/10000))="0",RIGHT(INT(ROUND(ABS(B20),2)/1000))<>"0"),SUBSTITUTE(TEXT(INT(ROUND(ABS(B20),2)),"[DBNum2]"),"万","万零"),TEXT(INT(ROUND(ABS(B20),2)),"[DBNum2]"))&"元")&IF(RIGHT(TEXT(B20,".00"),2)*1=0,IF(ABS(B20)<0.005,"","整"),IF(ABS(B20)<0.095,"",IF((LEFT(RIGHT(TEXT(B20,".00"),2))<>"0")*(ABS(B20)>=1),IF(RIGHT(TRUNC(B20),1)>0,"","零"),"")&TEXT(LEFT(RIGHT(TEXT(B20,".00"),2)),"[dbnum2]"))&IF(LEFT(RIGHT(TEXT(B20,".00"),2))*1=0,"","角")&IF(RIGHT(TEXT(B20,".00"))*1=0,"整",TEXT(RIGHT(TEXT(B20,".00")),"[dbnum2]")&"分")))

[ 本帖最后由 jsrccb502803 于 2009-8-14 15:09 编辑 ]

hyfgb

据我所知,支票和进帐单很多地方都是需要这样大写的,虽然国家有通知,两种都可以,但银行就是规定按这种方法,说是为了资金安全,领导当然就要怕了,所以出纳的活路就是这样多出来的,没有办法,只得照办!!!谁叫我不是领导呢?

hyfgb

谢谢这么好高手哈,不过,正常情况的下的会计格式我已经做出来了,现在是当数大于10,而个位为0时,并且在有角或者分时需要在"元"后加一个"零",比如10.11应读成"壹拾元零壹角壹分";另一个问题就是当数字大于10万或者100万,而没有几万,像106000,或者1006000,10006000等等这种类型的数字,在读的时候,在"陆仟"前加一个"零",8楼的那个工具中"特殊"就是完全正确的

alzeng

1,当出现100.11,1000.11,10000.11之类的数字时,没有在元后加上"零"
2,当是整数,如10万,100万,1000万之类的数字时,在元后多一个"零"

老实说，不是做你这行的还真不会做那么多测试：
自定义大写金额.rar (22.2 KB, 下载次数: 47)

2009-8-14 16:05 上传

点击文件名下载附件

hyfgb

我在试中,希望这次完全对了哈,

hyfgb

十三分感谢"一念"等高手们,现在我测试来只差"佰万零"和"仟万零",不过我自己已经模仿改好了,感谢中..........

alzeng

原帖由 hyfgb 于 2009-8-14 16:18 发表
十三分感谢"一念"等高手们,现在我测试来只差"佰万零"和"仟万零",不过我自己已经模仿改好了,感谢中..........

不需要另外再加这些吧？

ktwang

长见识呀！