标准版(100%符合财务规范)
=SUBSTITUTE(“人民币：”&SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(INT(A1),”[dbnum2]”)&TEXT(MOD(A1,1)*100,”[<0.5][dbnum2]元整;[<9][dbnum2]元00分;[dbnum2]元0角0分”),”零分”,””),”零元零”,””),”零元”,””),”人民币：整”,”人民币：零元整”)
简短版(99%符合财务规范)
=”人民币：”&TEXT(INT(A1),”[dbnum2]”)&TEXT(MOD(A1,1)*100,”[<0.5][dbnum2]元整;[<9][dbnum2]元00分;[dbnum2]元0角0分”)
使用方法
将上公式粘贴至需要填写大写金额的单元格，并将公式中的”A1″部分替换成小写金额所在的单元格地址。填充操作可以自动更改。
实际效果如下图：
其他类似大写公式
1、公式一：
=SUBSTITUTE(SUBSTITUTE(IF(A1>-0.5%,,”负”)&TEXT(INT(ABS(A1)+0.5%),”[dbnum2]G/通用格式元;;”)&TEXT(RIGHT(FIXED(A1),2),”[dbnum2]0角0分;;”&IF(ABS(A1)>1%,”整”,)),”零角”,IF(ABS(A1)<1,,”零”)),”零分”,”整”)
使用时需要替换5处， 对没有分位的数字会加”整”字，不规范，如：23,550.10得出：贰万叁仟伍佰伍拾元壹角整。
2、公式二：
=SUBSTITUTE(SUBSTITUTE(TEXT(TRUNC(FIXED(A2)),”[dbnum2]G/通用格式元;负[dbnum2]G/通用格式元;”&IF(A2>-0.5%,,”负”))&TEXT(RIGHT(FIXED(A2),2),”[dbnum2]0角0分;;”&IF(ABS(A2)>1%,”整”,)),”零角”,IF(ABS(A2)<1,,”零”)),”零分”,”整”)
3、公式三：
=IF(ABS(A1)<0.5%,””,SUBSTITUTE(SUBSTITUTE(IF(A1<0,”负”,)&TEXT(INT(ABS(A1)+0.5%),”[dbnum2]G/通用格式元;;”)&TEXT(RIGHT(FIXED(A1),2),”[dbnum2]0角0分;;整”),”零角”,IF(ABS(A1)<1,,”零”)),”零分”,”整”))
4、公式四：
=TEXT(INT(A3),”[dbnum2]”)&”元”&IF(INT(A3*10)-INT(A3)*10=0,””,TEXT(INT(A3*10)-INT(A3)*10,”[dbnum2]”)&”角”)&IF(INT(A3*100)-INT(A3*10)*10=0,”整”,TEXT(INT(A3*100)-INT(A3*10)*10,”[dbnum2]”)&”分”)
本文来自投稿，不代表天一生活立场，如若转载，请注明出处：http://tiyigo.com/it/6785.html
