为了正常的体验网站,请在浏览器设置里面开启Javascript功能!

Excel函数公式转换人民币大小写

2011-11-15 3页 doc 43KB 83阅读

用户头像

is_151749

暂无简介

举报
Excel函数公式转换人民币大小写Excel函数公式转换人民币大小写 问题:想将A1中人民币的小写数字,在B1中转成人民币大写。 解答:B1中输入=TEXT(A1*100,"[dbnum2]0拾0万0仟0佰0拾0元0角0分")就可以了,如果你不要拾万位,自己可以修改的,如=TEXT(A1*100,"[dbnum2]0万0仟0佰0拾0元0角0分")等形式都可以的。 ⑴已知:A1=4.51 函数:B1 =TEXT(A1*100,"[dbnum2]0拾0万0仟0佰0拾0元0角0分") 结果:零拾零万零仟零佰零拾肆元伍角壹分 ⑵已知:A1=456789.23 函...
Excel函数公式转换人民币大小写
Excel函数公式转换人民币大小写 问题:想将A1中人民币的小写数字,在B1中转成人民币大写。 解答:B1中输入=TEXT(A1*100,"[dbnum2]0拾0万0仟0佰0拾0元0角0分")就可以了,如果你不要拾万位,自己可以修改的,如=TEXT(A1*100,"[dbnum2]0万0仟0佰0拾0元0角0分")等形式都可以的。 ⑴已知:A1=4.51 函数:B1 =TEXT(A1*100,"[dbnum2]0拾0万0仟0佰0拾0元0角0分") 结果:零拾零万零仟零佰零拾肆元伍角壹分 ⑵已知:A1=456789.23 函数:B1 =TEXT(A1*100,"[dbnum2]0拾0万0仟0佰0拾0元0角0分") 结果:肆拾伍万陆仟柒佰捌拾玖元贰角叁分 ⑶已知:A1=123456789.2(注:位数不能超过拾万) 函数:B1 =TEXT(A1*100,"[dbnum2]0拾0万0仟0佰0拾0元0角0分") 结果:壹贰叁肆拾伍万陆仟柒佰捌拾玖元贰角叁分 ⑷已知:A1=4.51 函数:B1=TEXT(A1*100,"[dbnum2]0万0仟0佰0拾0元0角0分") 结果:零万零仟零佰零拾肆元伍角壹分 ⑸已知:A1=23.25 函数:B1=TEXT(A1*100,"[dbnum2] 0拾0元0角0分") 结果:贰拾叁元贰角伍分 ⑹已知:B9=123456789.12 函数:=IF(B9<=0,,TEXT(INT(B9),"[dbnum2]人民币G/通用格式")&"元"&IF(INT(B9*10)-INT(B9)*10=0,IF(INT(B9)*(INT(B9*100)-INT(B9*10)*10)=0,"","零"),TEXT(INT(B9*10)-INT(B9)*10,"[dbnum2]")&"角")&IF((INT(B9*100)-INT(B9*10)*10)=0,"整",TEXT((INT(B9*100)-INT(B9*10)*10),"[dbnum2]")&"分")) 结果:人民币壹亿贰仟叁佰肆拾伍万陆仟柒佰捌拾玖元壹角贰分 ⑺已知:B9=123456789.12 函数:=IF(B9<=0,,TEXT(INT(B9),"[dbnum2]G/通用格式")&"元"&IF(INT(B9*10)-INT(B9)*10=0,IF(INT(B9)*(INT(B9*100)-INT(B9*10)*10)=0,"","零"),TEXT(INT(B9*10)-INT(B9)*10,"[dbnum2]")&"角")&IF((INT(B9*100)-INT(B9*10)*10)=0,"整",TEXT((INT(B9*100)-INT(B9*10)*10),"[dbnum2]")&"分")) 结果:壹亿贰仟叁佰肆拾伍万陆仟柒佰捌拾玖元壹角贰分 ⑻已知:B9=123456789.12 函数:=IF(ROUND(B9,2)=0,"",IF(ROUND(ABS(B9),2)>=1,TEXT(INT(ROUND(ABS(B9),2)),"[DBNum2]")&"元","")&IF(RIGHT(TEXT(B9,".00"),2)*1=0,"整",IF(RIGHT(TEXT(B9,".00"),4)*1>=1,IF(RIGHT(TEXT(B9,".00"),2)*1>9,"","零"),IF(ROUND(ABS(B9),2)>=1,"零",""))&IF(RIGHT(TEXT(B9,".00"),2)*1>9,TEXT(LEFT(RIGHT(TEXT(B9,".00"),2)),"[DBNum2]")&"角","")&IF(RIGHT(TEXT(B9,".00"))*1>0,TEXT(RIGHT(TEXT(B9,".00")),"[DBNum2]")&"分","整"))) 结果:壹亿贰仟叁佰肆拾伍万陆仟柒佰捌拾玖元壹角贰分 核心提示: 人民币金额大写转换是财务和会计领域的热点问题,网络提供此问题的很多,主要有VBA、自定义函数、多种函数嵌套等。实践检验,通过函数嵌套最为方便。而函数嵌套又很多种,本文中提供的几个公式最为方便,建议需要的用户使用此方法。 Excel可以制作各种专业的会计报,但是很多会计人员都无法准确而快速地将会计报表中的小写金额转化为大写金额,如果手工输入这些大写金额,或者或少总会出现种错误,并且输入的速度慢了很多,这样就大大影响了工作效率。一些对Excel技术相对熟练的会计人员都是将数值转换成人民币中文大写金额,一般是采用将单元格格式自定义为"[dbnum2]&元"这种方法。但是在输入带有小数的数值时却出现了问题,比如在输入123.4的时候,变为"壹佰贰拾叁.肆元",这样子是不符合财务格式的,应该是"壹佰贰拾叁元肆角"才对。那么能不能在Excel中实现将任意数值转为人民币大写金额呢? 经过多位Excel技术精通人士多年对此问题进行研究,目前已找到解决此类问题的方法,其中通过Excel函数多次嵌套可以轻松解决人民币金额从小写转换大写,下面的方法都可一试。 假定A2单元格是需要转换成大写金额的小写数字。 =IF(ABS(A2)<0.005,"",IF(A2<0,"负",)&IF(INT(ABS(A2)),TEXT(INT(ABS(A2)),"[dbnum2]")&"元",)&IF(INT(ABS(A2)*10)-INT(ABS(A2))*10,TEXT(INT(ABS(A2)*10)-INT(ABS(A2))*10,"[dbnum2]")&"角",IF(INT(ABS(A2))=ABS(A2),,IF(ABS(A2)<0.1,,"零")))&IF(ROUND(ABS(A2)*100-INT(ABS(A2)*10)*10,),TEXT(ROUND(ABS(A2)*100-INT(ABS(A2)*10)*10,),"[dbnum2]")&"分","整"))。 仔细检查公式输入无误后,按回车键即可将A2单元格中人民币小写金额转换为人民币大写金额。 经检验,下面的公式也很好: 在EXCEL中,假设A1为数字格式单元格,在任意单元格内粘贴下面公式即可显示大定金额: =IF(A1<=0,,TEXT(INT(A1),"[dbnum2]人民币G/通用格式")&"元"&IF(INT(A1*10)-INT(A1)*10=0,IF(INT(A1)*(INT(A1*100)-INT(A1*10)*10)=0,"","零"),TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角")&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分")) 假如不需要“人民币”几个字,在公式里直接删除这几个字即可! 下面的公式也可一试,我已经试过了,挺好,就是公式长了点。 假定你要在A5输入阿拉佰数字,B5转换成中文大写金额(含元角分),请在B5单元格输入如下公式: =IF((INT(A5*10)-INT(A5)*10)=0,TEXT(INT(A5),"[DBNum2]G/通用格式")&"元"&IF((INT(A5*100)-INT((A5)*10)*10)=0,"整","零"&TEXT(INT(A5*100)-INT(A5*10)*10,"[DBNum2]G/通用格式")&"分"),TEXT(INT(A5),"[DBNum2]G/通用格式")&"元"&IF((INT(A5*100)-INT((A5)*10)*10)=0,TEXT((INT(A5*10)-INT(A5)*10),"[DBNum2]G/通用格式")&"角整",TEXT((INT(A5*10)-INT(A5)*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(A5*100)-INT(A5*10)*10,"[DBNum2]G/通用格式")&"分")) 注:可先将公式复制到你要显示大写金额的单元格,然后用"替换"功能将公式中的"A5"替换成你存放小写数字的单元格地址。 下面公式中句中的B4为小写的单元格数,数值大到几百亿也有效,有兴趣的话不妨一试。 =IF(ISERROR(FIND(".",B4)),NUMBERSTRING(INT(B4),2)&"元整",IF(ISERROR(NUMBERSTRING(MID(B4,FIND(".",B4)+2,1),2)),NUMBERSTRING(INT(B4),2)&"元"&NUMBERSTRING(MID(B4,FIND(".",B4)+1,1),2)&"角整",NUMBERSTRING(INT(B4),2)&"元"&NUMBERSTRING(MID(B4,FIND(".",B4)+1,1),2)&"角"&NUMBERSTRING(MID(B4,FIND(".",B4)+2,1),2)&"分")) “NUMBERSTRING”这个函数在插入函数里是没有,它是将阿拉伯数字转化另一种格式的一个函数,参数1、2、3,返回的是不同的格式。 经检验,这个公式在Excel中可正常使用,在WPS表格不可用,可能就是因为“NUMBERSTRING”这个函数得缘故吧! 特别:假定需要转换的数字是999.09,上面几个公式转换的结果都是:玖佰玖拾玖元零玖分,而最后一个公式转换的结果是:玖佰玖拾玖元零角玖分,请根据需要选择吧!
/
本文档为【Excel函数公式转换人民币大小写】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。 本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。 网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
热门搜索

历史搜索

    清空历史搜索