如何在电子表格中将数字自动转化为大写的元角分？

如何在电子表格中将数字自动转化为大写的元角分？... 如何在电子表格中将数字自动转化为大写的元角分？展开

 我来答

2个回答

#热议# 在购买新能源车时，要注意哪些？

懒羊羊814
推荐于2016-11-05 · TA获得超过476个赞

知道小有建树答主

回答量：319

采纳率：100%

帮助的人：318万

我也去答题访问个人页

关注

展开全部

=SUBSTITUTE(SUBSTITUTE(IF(A2<0,"负","")&TEXT(TRUNC(ABS(ROUND(A2,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A2,2))),"",TEXT(RIGHT(TRUNC(ROUND(A2,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A2,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A2,2),3))=".",TEXT(RIGHT(ROUND(A2,2)),"[DBNum2]")&"分",IF(ROUND(A2,2)=0,"","整")),"零元零",""),"零元","零")
A2为数字所在单元格！ 

这公式是当出现负值是大写前面写“负”，如果想改为无效数值的话，公式需要修改为：
=IF(ROUND(A2,2)<0,"无效数值",IF(ROUND(A2,2)=0,"零",IF(ROUND(A2,2)<1,"",TEXT(INT(ROUND(A2,2)),"[dbnum2]")&"元")&IF(INT(ROUND(A2,2)*10)-INT(ROUND(A2,2))*10=0,IF(INT(ROUND(A2,2))*(INT(ROUND(A2,2)*100)-INT(ROUND(A2,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(A2,2)*10)-INT(ROUND(A2,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(A2,2)*100)-INT(ROUND(A2,2)*10)*10)=0,"整",TEXT((INT(ROUND(A2,2)*100)-INT(ROUND(A2,2)*10)*10),"[dbnum2]")&"分")))

上述两公式均来自于网友提供，并非本人原创，借花献佛，不好意思！

本回答被提问者采纳

已赞过已踩过<

你对这个回答的评价是？
评论收起