请教：怎样根据小写数字自动生成大写

和程周军 · 发表于 2011-10-9 00:31

=IF((INT(H27*10)-INT(H27)*10)=0,TEXT(INT(H27),"[DBNum2]G/通用格式")&"元"&IF((INT(H27*100)-INT((H27)*10)*10)=0,"整","零"&TEXT(INT(H27*100)-INT(H27*10)*10,"[DBNum2]G/通用格式")&"分"),TEXT(INT(H27),"[DBNum2]G/通用格式")&"元"&IF((INT(H27*100)-INT((H27)*10)*10)=0,TEXT((INT(H27*10)-INT(H27)*10),"[DBNum2]G/通用格式")&"角整",TEXT((INT(H27*10)-INT(H27)*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(H27*100)-INT(H27*10)*10,"[DBNum2]G/通用格式")&"分"))

dzzf · 发表于 2011-10-9 14:02

=IF(B40<0,"金额为负无效",IF(OR(B40=0,B40=""),"零元整",IF(B40<1,"",TEXT(INT(B40),"[dbnum2]G/通用格式")&"元"))) & IF(INT(B40*10)-INT(B40)*10=0,IF(INT(B40)*(INT(B40*100)-INT(B40*10)*10)=0,"","零"),TEXT(INT(B40*10)-INT(B40)*10,"[dbnum2]")&"角")&IF((INT(B40*100)-INT(B40*10)*10)=0,"整",TEXT((INT(B40*100)-INT(B40*10)*10),"[dbnum2]")&"分") 我一直用这个公式

感觉（奇迹） · 发表于 2011-10-10 10:59

本帖最后由感觉（奇迹）于 2011-10-10 11:00 编辑

ladhome 发表于 2004-4-24 00:35
哦，又多了一点积累。马上试用却发现始终不能生成人民币大写金额。
NUMBERSTRING(数值,功能代码)
数值可以 ...

谢谢，请问如果后面有小数点该怎么做呢，我试了一下，好像只能到整数部分，小数点后面的没有

aliens · 发表于 2011-10-10 15:39

学习学习。。。

蠢蠢欲动 · 发表于 2011-10-13 14:56

又学习一招

通程财务 · 发表于 2012-5-21 17:31

本帖最后由通程财务于 2012-5-21 17:32 编辑

excel非常之强大啊

www.cddljz.com

ywzx703 · 发表于 2012-5-24 10:00

谢谢分享！

mongren · 发表于 2012-6-6 11:24

本帖最后由 mongren 于 2012-6-13 11:11 编辑

用这个实现金额小写转大写没错（E12是小写所在单元格，改下就是了）：
=SUBSTITUTE(SUBSTITUTE(IF(E12>-0.5%,,"负")&TEXT(INT(ABS(E12)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(FIXED(E12),2),"[dbnum2]0角0分;;"&IF(ABS(E12)>1%,"整",)),"零角",IF(ABS(E12)<1,,"零")),"零分","整")
其实用下面这个就可以了，依我看上面公式中的（红色部分）&IF(ABS(E12)>1%,"整",)是多余的！
=SUBSTITUTE(SUBSTITUTE(IF(E12>-0.5%,,"负")&TEXT(INT(ABS(E12)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(FIXED(E12),2),"[dbnum2]0角0分;;"),"零角",IF(ABS(E12)<1,,"零")),"零分","整")

rjtang · 发表于 2012-6-6 21:37

谢谢,又学得一函数.

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

[讨论] 请教：怎样根据小写数字自动生成大写