您的位置首页  散文日记

干货分享金额大小写转换(金额大小写转换公式含角分)

在excel表格中,如何利用公式将小写金额转换为大写?\x0a看完这篇文章,你就知道可以用哪些公式转换了……

干货分享金额大小写转换(金额大小写转换公式含角分)

 

昨天有客户在做报关资料的时候,反应大写金额转换错误突然想起公司的“付款申请表”模板里面,有人民币金额大写公式,所以套用了下我们公司用的公式,实测是对的正确公式一:=IF(F161,TEXT(TRUNC(ABS(ROUND(F16,2))),"[DBNum2]")&"。

元","")&IF(ISERR(FIND(".",ROUND(F16,2))),"",TEXT(RIGHT(TRUNC(ROUND(F16,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(F16,"0.00"))),"

角","")&IF(LEFT(RIGHT(ROUND(F16,2),3))=".",TEXT(RIGHT(ROUND(F16,2)),"[DBNum2]")&"分","整")(备注:F16为小写金额在表格中的位置。

公式复制过去后,需根据小写金额所在的位置去修改,将F16修改成其他单元格)本着学习使我快乐的精神,研究了客户她们公司的大写金额公式,找了度娘对比,还是百思不得其解百度文库里面,也有这个公式,对比来对比去,并没有发现文库里的公式跟客户的公式有不一样的地方。

正确公式二:=IF((F16-INT(F16))=0,TEXT(F16,"[DBNUM2]")&"元整",IF(INT(F16*10)-F16*10=0,TEXT(INT(F16),"[DBNUM2]")&"

元"&TEXT((INT(F16*10)-INT(F16)*10),"[DBNUM2]")&"角整",TEXT(INT(F16),"[DBNUM2]")&"元"&IF(INT(F16*10)-INT(F16)*10=0,"

零",TEXT(INT(F16*10)-INT(F16)*10,"[DBNUM2]")&"角")&TEXT(RIGHT(F16,1),"[DBNUM2]")&"分 "))既然文库上的公式二是对的,那我们先来验证一下这个公式。

验证方法:1.新建一个excel工作表;2.在A1单元格随意输入小写金额,比如1234.56;3.复制公式二到B1单元格,并将公式里的F16全部用A1替换;4.按下Enter键,得到结果“壹仟贰佰叁拾肆元伍角陆分”;

实践证明,公式二确实是正确的。那客户的工作表里面,公式没有错,大写金额却不对,这到底是哪里有问题呢?寻思着,寻思着,只能重新返回客户的工作表仔细钻研。

上述截图中,大写金额理应是“叁万捌仟柒佰伍拾柒元陆角整”才对,为什么公式一用到这个表格就不对了呢?端详来,端详去,想得脑壳都疼了……

最后,灵光一现,目光开始聚焦到小写金额F16单元格发现这个单元格是用了公式的,用了求和的公式但是我一开始验证公式正确性的时候,A1单元格是手动输入的小写金额,并没有使用过任何公式所以,把此处的公式“=SUM(G15:G15)

”去掉,F16单元格手动输入金额38757.60,按下Enter键,得到的结果如下图所示。

小写金额所在的单元格F16,在不使用任何公式的情况下,最后转换成大写金额的结果就是正确的虽然不明白是什么原因,但是得到的结论就是这样1.小写金额使用公式→转换的大写金额不准确2.小写金额不使用公式→转换的大写金额准确无误。

Excel中金额大小写转换的问题,终于解决可以告一段落了其实,金额大小写转换的公式有很多个,大家可以有选择性地去使用但是要注意有的公式使用是有条件限制的,比如我们上面所说的公式二最后,再次重复一下此篇文章中涉及到的两个金额大小写转换公式。

公式一:=IF(F161,TEXT(TRUNC(ABS(ROUND(F16,2))),"[DBNum2]")&"元","")&IF(ISERR(FIND(".",ROUND(F16,2))),"",TEXT(RIGHT(TRUNC(ROUND(F16,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(F16,"0.00"))),"

角","")&IF(LEFT(RIGHT(ROUND(F16,2),3))=".",TEXT(RIGHT(ROUND(F16,2)),"[DBNum2]")&"分","整")公式二:=IF((F16-INT(F16))=0,TEXT(F16,"[DBNUM2]")&"

元整",IF(INT(F16*10)-F16*10=0,TEXT(INT(F16),"[DBNUM2]")&"元"&TEXT((INT(F16*10)-INT(F16)*10),"[DBNUM2]")&"

角整",TEXT(INT(F16),"[DBNUM2]")&"元"&IF(INT(F16*10)-INT(F16)*10=0,"零",TEXT(INT(F16*10)-INT(F16)*10,"[DBNUM2]")&"

角")&TEXT(RIGHT(F16,1),"[DBNUM2]")&"分 "))(使用条件:转换公式里的F16单元格不能使用任何公式)求点赞

免责声明:本站所有信息均搜集自互联网,并不代表本站观点,本站不对其真实合法性负责。如有信息侵犯了您的权益,请告知,本站将立刻处理。联系QQ:1640731186