1 / 12
文档名称:

引用 EXCEL中金额小写转大写.doc

格式:doc   大小:146KB   页数:12
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

引用 EXCEL中金额小写转大写.doc

上传人:drp539608 2019/8/1 文件大小:146 KB

下载得到文件列表

引用 EXCEL中金额小写转大写.doc

文档介绍

文档介绍:到现在为止EXCEL中自带的金额小写转大写功能都不能如我们中国人的习惯,曾有朋友问过我如何做到人性化点,还真惭愧,我的EXCEL办公方面的软件使用很差,我相信会有公式可以完成,于是上面到处找,但当时都没有找到,只好作罢!今天又再有朋友问起,,以下就是我本人从网络上收集到的,因为不知作者为何人,在此只能为这些默默奉献的朋友说声谢谢!     在网上找到有二篇,! =======================第一篇========================       要将人民币小写金额转换成大写格式,用Excel提供的格式,将自定义格式类型中的“[dbnum2]G/通用格式”改为“[dbnum2]G/通用格式“元””来实现。但在转换小数时却出现了问题,比如¥6,“”。那么用Excel能不能解决这一先天不足呢?其方法有以下两种(以下均对B1转换,假设B1是通过函数ROUND()四舍五入取得二位小数的小写金额数,其值为¥6,)。一、在三个连续的同行单元格中转换 “=IF(B1〈0,"金额为负无效",INT(B1))”,计算结果为¥6,,然后点击“格式→单元格→数字→特殊→中文大写数字→确定”,B2显示“陆仟零伍拾”,再点击“格式→单元格→数字→自定义”,将“类型”编辑框中的“[dbnum2]G/通用格式”修改为:[dbnum2](“人民币”)G/通用格式“元”,此时B2显示:“(人民币)陆仟零伍拾元”。 “=IF(B1〈0,"",INT(B110)-INT(B1)10)”,同样C2改为:[DBNum2]G/通用格式“角”,C2显示:“零角”。 “=IF(B1〈0,"",INT(B1100)-INT(B110)10)”,同样D2改为:[DBNum2]G/通用格式“分”,D2显示:“玖分”。这样在连续的三个同行单元格中实现了大写金额格式的转换,如图1所示。为了使转换符合财务格式,B2应右对齐,C2列宽无间隔,且不设左右边框线,D2要左对齐。 图1 二、用Excel提供的函数转换个位为0,则不显示;不为0,显示“XXX元”;不为0、且角位和分位均为0,显示“XXX元整”;元角分位均为0,则显示“零元整”。小数点后面第一位为0、且元位或分位有一为0,则不显示;为0、且元位和分位均不为0,则显示“零”;不为0,显示“X角”。小数点后面第二位为0,则显示“整”;不为0,显示“X分”。根据以上思路在B2中输入公式: “IF(B1〈0,"金额为负无效",IF(OR(B1=0,B1=""),"(人民币)零元整")); IF(B1〈1,"(人民币)",TEXT(INT(B1),"[dbnum2](人民币)G/通用格式")&&"元")&&IF(INT(B110)-INT(B1)10=0); IF(INT(B1)(INT(B1100)-INT(B110)10)=0,"","零"),TEXT(INT(B110)-INT(B1)10,"[dbnum2]")&&"角")&&IF((INT(B1100)-INT(B110)10)=0,"整",TEXT((INT(B1100)-INT(B1*10)*10),"[dbnum2]")&&"分")))”。确认后B2显示:“(人民币)陆仟零伍拾元零玖分”。以后使用时将公式复制到有关单元格中,若转换的对象B1发生了变化,可点击“编辑→替换”将B1替换掉。两种转换测试结果如图2所示。图2======================第一篇(完)=====================第一篇我照做时,我发现第二种方法,我弄不出来,可能是我弄错,不过不理它,因为我采用了第二篇的相当方便=======================第二篇(推荐)===================