=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,,"零")),"零分","整")
=IF(ABS(a1)<0.005,"",IF(a1<0,"负",)&IF(INT(ABS(a1)),TEXT(INT(ABS(a1)),"[dbnum2]")&"元",)&IF(INT(ABS(a1)*10)-INT(ABS(a1))*10,TEXT(INT(ABS(a1)*10)-INT(ABS(a1))*10,"[dbnum2]")&"角",IF(INT(ABS(a1))=ABS(a1),,IF(ABS(a1)<0.1,,"零")))&IF(ROUND(ABS(a1)*100-INT(ABS(a1)*10)*10,),TEXT(ROUND(ABS(a1)*100-INT(ABS(a1)*10)*10,),"[dbnum2]")&"分","整"))
=TEXT(INT(A1),"[DBNum2][$-804]G/通用格式元")&TEXT((A1-INT(A1))*100,"[DBNum2][$-804]0角0分")
以上都是数字转大写的,公式,
只需将单元格改一下就行
用=DX()