如何将小写金额转换成大写金额
但是问题是“元\角\分”还是没能正常显示!
尤其是在支票之类的财会领域。
有答案了:
在excel中A2单元格输入以下代码
=IF((A1-INT(A1))=0,"¥"&TEXT(A1,"[DBNUM2]")&"元整",IF(INT(A1*10)-A1*10=0,"¥"&TEXT(INT(A1),"[DBNUM2]")&"元"&TEXT((INT(A1*10)-INT(A1)*10),"[DBNUM2]")&"角整","¥"&TEXT(INT(A1),"[DBNUM2]")&"元"&IF(INT(A1*10)-INT(A1)*10=0,"零",TEXT(INT(A1*10)-INT(A1)...全部
但是问题是“元\角\分”还是没能正常显示!
尤其是在支票之类的财会领域。
有答案了:
在excel中A2单元格输入以下代码
=IF((A1-INT(A1))=0,"¥"&TEXT(A1,"[DBNUM2]")&"元整",IF(INT(A1*10)-A1*10=0,"¥"&TEXT(INT(A1),"[DBNUM2]")&"元"&TEXT((INT(A1*10)-INT(A1)*10),"[DBNUM2]")&"角整","¥"&TEXT(INT(A1),"[DBNUM2]")&"元"&IF(INT(A1*10)-INT(A1)*10=0,"零",TEXT(INT(A1*10)-INT(A1)*10,"[DBNUM2]")&"角")&TEXT(RIGHT(A1,1),"[DBNUM2]")&"分"))
随后在A1为输入金额大小,A2就自动跳出你所需的文字了。
A1:
121654651324。
14
A2:
¥壹仟贰佰壹拾陆亿伍仟肆佰陆拾伍万壹仟叁佰贰拾肆元壹角肆分
============
代码更改如下:
=IF((A2-INT(A2))=0,"¥"&TEXT(A2,"[DBNUM2]")&"元整",IF(INT(A2*10)-A2*10=0,"¥"&TEXT(INT(A2),"[DBNUM2]")&"元"&TEXT((INT(A2*10)-INT(A2)*10),"[DBNUM2]")&"角整","¥"&TEXT(INT(A2),"[DBNUM2]")&"元"&IF(INT(A2*10)-INT(A2)*10=0,"零",TEXT(INT(A2*10)-INT(A2)*10,"[DBNUM2]")&"角")&TEXT(RIGHT(ROUND(A2,2),1),"[DBNUM2]")&"分"))
我觉得alkaid_pku你的那个=号用的很不错,可以借鉴!谢谢提示!
但是其实只要在TEXT(RIGHT后加一个(ROUND(A2,2)->TEXT(RIGHT(ROUND(A2,2),1)
就可以了不用写那么复杂的公式的
这个公式应该也可以的吧?
==============
结合两人的优点最后得出的最简单的公式:
=IF(A2=INT(A2),"¥"&TEXT(A2,"[DBNUM2]")&"元整",IF(INT(A2*10)=A2*10,"¥"&TEXT(INT(A2),"[DBNUM2]")&"元"&TEXT((INT(A2*10)-INT(A2)*10),"[DBNUM2]")&"角整","¥"&TEXT(INT(A2),"[DBNUM2]")&"元"&IF(INT(A2*10)=INT(A2)*10,"零",TEXT(INT(A2*10)-INT(A2)*10,"[DBNUM2]")&"角")&TEXT(RIGHT(ROUND(A2,2),1),"[DBNUM2]")&"分"))
对了,最后忘记写了,金额的封口如果不是需要“¥”的话可以使用excel中的替换(ctrl+h)将公式中的“¥”替换成“RMB”“人民币”或其它。收起