人民币小写金额转换成大写.doc

人民币小写金额转换成大写 Excel中要将人民币小写金额转换成大写格式，将自定义格式类型中的“G/通用格式”改为“G/通用格式“元””来实现。但在转换小数时却出现了问题，比如￥6,050.09只能转换为“陆仟零伍拾.零玖圆”。那怎么解决这一先天不足呢？ 　　方法有以下两种(以下均对B1单元格转换，假设B1通过函数ROUND( )四舍五入取得二位小数的小写金额数，其值为￥6,050.09)。 　　一、在三个连续的同行单元格中转换 　　1. B2中输入公式 “=IF(B10，金额为负无效，INT(B1))”，计算结果为￥6,050.00，然后点击“格式→单元格→数字→特殊→中文大写数字C2中输入“=IF(B10，，INT(B110)-INT(B1)10)”，同样C2改为：G/通用格式“角”，C2显示：“零角”。 　　3. D2中输入“=IF(B10，，INT(B1100)-INT(B110)10)”，同样D2改为：G/通用格式“分”， D2显示：“玖分”。 　　这样在连续的三个同行单元格中实现了大写金额格式的转换，如图1。为了使转换符合财务格式，B2应右对齐，C2列宽无间隔，且不设左右边框线，D2要左对齐。 　　图1 显示大写金额 　　二、用Excel提供的函数转换 　　个位为0，则不显示；不为0，显示“XXX元”；不为0、且角位和分位均为0，显示“XXX元整”；元角分位均为0，则显示“零元整”。 　　小数点TEXT(INT(B1)，(人民币)G/通用格式)元)IF(INT(B110)-INT(B1)10=0)； 　　IF(INT(B1)(INT(B1100)-INT(B110)10)=0，，零)，TEXT(INT(B110)-INT(B1)10，)角)IF((INT(B1100)-INT(B110)10)=0，整，TEXT((INT(B1100)-INT(B1*10)*10)，)分)))”。 　　确认后B2显示：“(人民币)陆仟零伍拾元零玖分”。以后使用时将公式复制到有关单元格中，若转换的对象B1发生了变化，可点击“编辑→替换”将B1替换掉。两种转换测试结果如图2所示。 　　图2 两种方式对话结果 　　原文地址：/132/joyelm/1001132.shtml