Excel數(shù)字小寫金額轉(zhuǎn)換漢字大寫金額公式在會計(jì)工作中是經(jīng)常應(yīng)用到的，它能提高工作效率和會計(jì)數(shù)據(jù)的準(zhǔn)確性。
網(wǎng)上有很多設(shè)置Excel數(shù)字小寫金額轉(zhuǎn)漢字大寫金額公式的方法，基本上都很繁瑣，且功能不全面（對負(fù)金額不能轉(zhuǎn)換）。
本人在Excel會計(jì)工作實(shí)踐中，設(shè)計(jì)了一個(gè)數(shù)字小寫金額轉(zhuǎn)換漢字大寫金額的公式，公式僅500多個(gè)字符，個(gè)人感覺還很滿意，現(xiàn)拿出來供大家分享，不足之處，也請大家不吝賜教。
公式如下：
=IF(ROUND(A1,2)=0,"",IF(A1<0,"負(fù)","")&IF(ABS(A1)>=1,TEXT(INT(ROUND(ABS(A1),2)),"[dbnum2]")&"元","")&IF(VALUE(MID(RIGHT(TEXT((ABS(A1)*100+100),"###"),2),1,1))=0,IF(VALUE(RIGHT(TEXT(ABS(A1)*100,"###"),1))=0,"整",IF(ABS(A1)>=1,"零","")&TEXT(VALUE(RIGHT(TEXT(ABS(A1)*100,"###"),1)),"[dbnum2]")&"分"),IF(VALUE(RIGHT(TEXT(ABS(A1)*100,"###"),1))=0,TEXT(VALUE(MID(RIGHT(TEXT((ABS(A1)*100+100),"###"),2),1,1)),"[dbnum2]")&"角整",TEXT(VALUE(MID(RIGHT(TEXT((ABS(A1)*100+100),"###"),2),1,1)),"[dbnum2]")&"角"&TEXT(VALUE(RIGHT(TEXT(ABS(A1)*100,"###"),1)),"[dbnum2]")&"分")))
公式中A1為小寫金額所在單元格，實(shí)際使用中只需將其替換為實(shí)際小寫金額所在單元格即可，非常方便。
公式可以對正數(shù)、零（本公式轉(zhuǎn)換為空白，與支票一致，如需轉(zhuǎn)換為“零元整”，只需在公式第一個(gè)雙引號內(nèi)加入即可）、負(fù)數(shù)（會計(jì)數(shù)據(jù)有時(shí)也涉及到）均可進(jìn)行轉(zhuǎn)換。
最近，在網(wǎng)上看到高手設(shè)計(jì)的更簡潔的轉(zhuǎn)換公式，缺點(diǎn)是只能把“0”轉(zhuǎn)換為空白，不能轉(zhuǎn)換為“零元整”，公式如下：
=SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1),IF(A1>0,,"負(fù)")&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;整"),),"零角",IF(A1^2<1,,"零")),"零分","整")
將以上兩個(gè)公式結(jié)合一下，達(dá)到既簡短，又能達(dá)到“0”的空白和“零元整”兩種（根據(jù)需要只能選其中一種）轉(zhuǎn)換結(jié)果的目的。公式如下：
=IF(ROUND(A1,2)=0,"",IF(A1<0,"負(fù)","")&IF(ABS(A1)>=1,TEXT(INT(ROUND(ABS(A1),2)),"[dbnum2]")&"元","")&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;整"),"零角",IF(A1^2<1,,"零")),"零分","整"))
以上三個(gè)公式的轉(zhuǎn)換效果是一樣的，如下圖所示：
