七律:心量广大:Excel函数公式实现人民币大小写

来源:百度文库 编辑:偶看新闻 时间:2024/03/29 22:41:15
Excel函数公式实现人民币大小写
2009-4-15 10:35:24 来源: 转载 作者:不详 录入:admin 访问:818 次 被顶:2 次 字号:【大 中 小】
核心提示: 人民币金额大写转换是财务和会计领域的热点问题,网络提供此问题的方法很多,主要有VBA、自定义函数、多种函数嵌套等。但通过函数嵌套最为方便。而函数嵌套又很多种,本文章中提供的公式最为方便,建议需要的用户使用此方法。...Excel可以制作各种专业的会计报表,但是很多会计人员都无法准确而快速地将会计报表中的小写金额转化为大写金额,如果手工输入这些大写金额,或者或少总会出现种错误,并且输入的速度慢了很多,这样就大大影响了工作效率。一些对Excel技术相对熟练的会计人员都是将数值转换成人民币中文大写金额,一般是采用将单元格格式自定义为"[dbnum2]&元"这种方法。但是在输入带有小数的数值时却出现了问题,比如在输入123.4的时候,变为"壹佰贰拾叁.肆元",这样子是不符合财务格式的,应该是"壹佰贰拾叁元肆角"才对。那么能不能在Excel中实现将任意数值转为人民币大写金额呢?
经过多位Excel技术精通人士多年对此问题进行研究,目前已找到解决此类问题的方法,其中通过Excel函数多次嵌套可以轻松解决人民币金额从小写转换大写,下面以实例进行说明。
第1步 在Excel工作表中输入相关数据,并在A列中输入一些具有代表性的人民币小写数据用来测试函数的功能,如图1所示。图1
第2步 在B2单元格中输入公式"=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]")&"分","整"))",如图2所示。
 图2
第3步 仔细检查公式输入无误后,按回车键即可将A2单元格中人民币小写金额转换为人民币大写金额,如图3所示。图3
第4步 拖动B2单元格中的填充柄将公式复制到以下相关的单元格中,即可将A列中数字转换为人民币大写,如图4所示。从公式的执行结果来看,此公式可以处理各种情况。图4
本文来自办公软件学习网,原文地址:http://www.officestudy.cn