excel 数字转人民币大写带负数的公式

答案:7 悬赏:50 手机版

解决时间 2021-02-05 04:16

提问者网友：未信
2021-02-04 04:59

最佳答案

五星知识达人网友：山有枢
2021-02-04 05:09

EXCEL中人民币转换大写，要注意以下几点：
为防止浮点小数误差，用ROUND函数修正为两位小数；
人民币大写时，不存在"零角零分"，"零分"，"零角"等写法，要统一换成“整”；
存在负数时，用绝对值函数ABS转换为正数再转换为大写；
根据上面几点，可以列出公式：="人民币"&IF(A1<0,"负",)&SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(INT(ROUND(ABS(A1),2)),"[dbnum2]")&"元"&TEXT(MOD(ROUND(ABS(A1),2),1)*100,"[dbnum2]0角0分"),"零角零分","整"),"零分","整"),"零角","零")。

全部回答

1楼网友：何以畏孤独
2021-02-04 09:58

不用这么麻烦，对单元格右键-设置单元格格式-数字-特殊-中文人民币大写数字或中文人民币大写数字2

2楼网友：洎扰庸人
2021-02-04 09:30

在第一个IF里加就可以了
=IF(F20<0,TEXT(INT(F20),"[dbnum2]人民币负G/通用格式")&"元",TEXT(INT(F20),"[dbnum2]人民币G/通用格式")&"元"&IF(INT(F20*10)-INT(F20)*10=0,IF(INT(F20)*(INT(F20*100)-INT(F20*10)*10)=0,"","零"),TEXT(INT(F20*10)-INT(F20)*10,"[dbnum2]")&"角")&IF((INT(F20*100)-INT(F20*10)*10)=0,"整",TEXT((INT(F20*100)-INT(F20*10)*10),"[dbnum2]")&"分"))

3楼网友：鸽屿
2021-02-04 08:11

=SUBSTITUTE(TEXT(A1,"[DBNum2]G/通用格式"),".","点")
=TEXT(A1*100,"[dbnum2]0万0仟0佰0拾0元0角0分")

4楼网友：白昼之月
2021-02-04 07:40

B1=SUBSTITUTE(SUBSTITUTE(IF(A1>-0.5%,,"负")&TEXT(INT(FIXED(ABS(A1))),"[dbnum2]G/通用格式元;;")&TEXT(RIGHt(FIXED(A1),2),"[dbnum2]0角0分;;"&IF(ABS(A1)>1%,"整",)),"零角",IF(ABS(A1)<1,,"零")),"零分","整")

5楼网友：拜訪者
2021-02-04 06:58

=IF(F21,TEXT(INT(F21),"[dbnum2]人民币G/通用格式;[dbnum2]人民币负G/通用格式;")&"元"&IF(INT(F21*10)-INT(F21)*10=0,IF(INT(F21)*(INT(F21*100)-INT(F21*10)*10)=0,"","零"),TEXT(INT(F21*10)-INT(F21)*10,"[dbnum2]")&"角")&IF((INT(F21*100)-INT(F21*10)*10)=0,"整",TEXT((INT(F21*100)-INT(F21*10)*10),"[dbnum2]")&"分"),"")

6楼网友：妄饮晩冬酒
2021-02-04 06:25

你可以直接换成下面公式试试。
=TEXT(LEFt(RMB(F20),LEN(RMB(F20))-3),"[>0][dbnum2]大写：G/通用格式元;[<0]负[dbnum2]G/通用格式元;;") & TEXT(RIGHt(RMB(F20),2),"[dbnum2]0角0分;;整")

我要举报

如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！