人民币金额大写方法及金额分列汇总

ugyun · 发表于 2012-4-26 22:17

slywtj123 发表于 2012-4-26 22:14
谢谢分享！

http://club.excelhome.net/thread-860661-1-1.html这里有更新的

fjzjm · 发表于 2012-4-26 22:20

谢谢楼主分享！！

wshcw · 发表于 2012-4-26 22:42

本帖最后由 wshcw 于 2012-4-26 22:48 编辑

wshcw 发表于 2012-4-26 20:44
小小的变通就可以了：
=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS( ...

再简化几字:
=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((MOD(ABS(A1%%),10)<1)*(MOD(ABS(A1%%),10)>=0.1),"万零","万")),"零分","整")
或者:
=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((MOD(ABS(A1%%),10)<1)*(MOD(ABS(A1%%),10)>=0.1),"零",)),"零分","整")

ujtxv · 发表于 2012-4-27 09:16

下载学习，谢谢版主

ugyun · 发表于 2012-4-27 21:49

本帖最后由 ugyun 于 2012-4-27 21:51 编辑

wshcw 发表于 2012-4-26 22:42
再简化几字:
=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS(A1)+0.5 ...

老师，能不能在上面公式的基础上，再修改下达到下面附件中的效果呀？今天下午我又将这些数据弄到“用友票据通”中一个一个测试，发现还是零的问题

释释然 · 发表于 2012-4-30 09:07

太厉害了，一直我都是只拷贝别人的公式，没想过还可以有这么多的表示，真的该还好好学学

ugyun · 发表于 2012-5-1 07:12

重点推荐公式1和自定义函数3和9

宝岛520 · 发表于 2012-5-1 09:20

谢谢，分享太棒了

wshcw · 发表于 2012-5-5 23:58

ugyun 发表于 2012-4-27 21:49
老师，能不能在上面公式的基础上，再修改下达到下面附件中的效果呀？今天下午我又将这些数据弄到“用友票 ...

你怎么会样样等着索取,该自己动手创新了.只有自己动手,才能丰衣足食.

wshcw · 发表于 2012-5-6 00:32

本帖最后由 wshcw 于 2012-5-6 00:36 编辑

与用友一致的大写公式:
=SUBSTITUTE(SUBSTITUTE(IF(-RMB(A2),IF(A2>0,,"（负）")&TEXT(INT(ABS(A2)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A2),2),"[>9][dbnum2]"&IF(MOD(ABS(A2),10)<1,0,)&"0角0分;"&IF(A2^2<1,,0)&"[>][dbnum2]0分;整"),),"万",IF((MOD(ABS(A2%%),10)<1)*(MOD(ABS(A2%%),10)>=0.1),"万零","万")),"零分","整")

		自动登录	找回密码
密码			免费注册

[分享] 人民币金额大写方法及金额分列汇总