财務少不了經常填寫大寫金額,網絡上有衆多的Excel大寫金額公式,但是非常少有100%完全符合财務規範要求的,而且公式很長,使用非常複雜,需要替換公式中4-5處以上的地方。
今天我給大家提供的大寫公式應該是最簡單的,而且完全符合财務規範。這是我經常在企業估值模型中使用的公式,沒有出現過錯誤,我也曾經搜索過網絡上各種大寫公式,确實沒有發現有更為簡單的,如果有大家務必告訴我。
完整版(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分")
效果如下圖:
使用方法
直接copy到需要填寫大寫金額的單元格,并将公式中的A1替換成小寫金額所在的單元格地址即可。
公式詳解
1、簡單版公式由3部分組成,&為字符串連接。
假定A1單元格的值為2,099.01,則:
第一部分:
"人民币:"&
結果=“人民币:”;
第二部分:
TEXT(INT(A1),"[dbnum2]")&
結果=“貳仟零玖拾玖”。int(A1)是取整數部分,Text(2099,"[dbnum2]")函數中“[dbnum2]”為數據格式,即大寫。
第三部分:
TEXT(MOD(A1,1)*100,"[<0.5][dbnum2]元整;[<9][dbnum2]元00分;[dbnum2]元0角0分")
結果="元零壹分"。
mod(A1,1)函數的作用是求A1單元格的值除以1後的餘數,即是小數部分0.01,
TEXT(10,"[<0.5][dbnum2]元整;[<9][dbnum2]元00分;[dbnum2]元0角0分")
格式的作用是:
[<0.5][dbnum2]元整 :
當小于1時取大寫加元整,即小數均為零時等于“元整”;
[<9][dbnum2]元00分 :
當小于9時的大寫格式,如:8,即為“元零捌分”;
[dbnum2]元0角0分 :
其他,除上述情況,如:1,即為“元零角壹分”;
2、完全版公式是在簡單版公式基礎上替換不合理的情況
函數 SUBSTITUTE(文本字符串 , 需要替代的舊字符, 用于替代的新字符), 在文本字符串中用新字符替代舊字符。
完全版公式增加了對簡單版公式得到的字符串進行替代處理,其中替代4種情況:
"零分" 替代成 "",即删除;
"零元零" 替代成 "",即删除;
"零元" 替代成 "",即删除;
"人民币:整" 替代成 "人民币:零元整"。
我是精英财務Excel課,請關注我,用最簡短秒懂的表達方式分享财務領域的各種知識。歡迎下方評論留言!
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!