EXCEL函数数字小写换大写.docVIP

EXCEL文本函数-数字小写换大写/英文大小写互换 2007年10月17日 星期三 13:04在大小写中英文互换公式中我们先假设每个表都有表头，且数字在第二行，在A2单元格内 注意：公式可以随意拖动至任意指定单元格，公式内对象不变；可复制（待鼠标变成黑色十字再拖)；也可利用查找-替换-全部替换 单元格?????? 如A2---全部换成F15 EXCEL中数字小写换大写方法一：在单元格A2中输入小写数字123.12 B2处输入以下公式 =SUBSTITUTE(SUBSTITUTE(IF(A20,负,)TEXT(TRUNC(ABS(ROUND(A2,2))),[DBNum2])元IF(ISERR(FIND(.,ROUND(A2,2))),,TEXT(RIGHT(TRUNC(ROUND(A2,2)*10)),[DBNum2]))IF(ISERR(FIND(.0,TEXT(A2,0.00))),角,)IF(LEFT(RIGHT(ROUND(A2,2),3))=.,TEXT(RIGHT(ROUND(A2,2)),[DBNum2])分,IF(ROUND(A2,2)=0,,整)),零元零,),零元,) EXCEL中数字小写换大写方法二： 在单元格A2中输入小写数字123.12 B2处输入以下公式 =IF((INT(A2*10)-INT(A2)*10)=0,TEXT(INT(A2),[DBNum2]G/通用格式)元IF((INT(A2*100)-INT((A2)*10)*10)=0,整,零TEXT(INT(A2*100)-INT(A2*10)*10,[DBNum2]G/通用格式)分),TEXT(INT(A2),[DBNum2]G/通用格式)元IF((INT(A2*100)-INT((A2)*10)*10)=0,TEXT((INT(A2*10)-INT(A2)*10),[DBNum2]G/通用格式)角整,TEXT((INT(A2*10)-INT(A2)*10),[DBNum2]G/通用格式)角TEXT(INT(A2*100)-INT(A2*10)*10,[DBNum2]G/通用格式)分)) EXCEL中数字小写换大写方法三： =IF(A2-INT(A2)=0,TEXT(INT(A2),[DBNum2]G/通用格式)圆整,TEXT(INT(A2),[DBNum2]G/通用格式)圆TEXT(INT((A2-INT(A2))*10),[DBNum2]G/通用格式)角TEXT(INT((A2*10-INT(A2*10))*10),[DBNum2]G/通用格式)分) EXCEL中数字小写换大写方法四： =IF((A2-INT(A2))=0,TEXT(A2,[DBNUM2])元整,IF(INT(A2*10)-A2*10=0,TEXT(INT(A2),[DBNUM2])元TEXT((INT(A2*10)-INT(A2)*10),[DBNUM2])角整,TEXT(INT(A2),[DBNUM2])元IF(INT(A2*10)-INT(A2)*10=0,零,TEXT(INT(A2*10)-INT(A2)*10,[DBNUM2])角)TEXT(RIGHT(A2,1),[DBNUM2])分)) 看看结果是不是出现了你想要的?应该有你需要的大写金额了 公式的由来: 仟分位公式如下: =TEXT(IF(LEN(INT($A1))=4,MID($A1,LEN(INT($A1))-3,1),),[DBNum2]) 佰分位公式如下: =TEXT(IF(LEN(INT($A1))=3,MID($A1,LEN(INT($A1))-2,1),),[DBNum2]) 第一位小数的公式: =TEXT(MID($A1,FIND(.,$A1)+1,1),[DBNum2]) 第二位小数的公式: =TEXT(MID(TEXT($A1,0.00),FIND(.,$A1)+2,1),[DBNum2])????? 其他依此类推^^^^^^^^^^^^^^^^ 用Excel函数将货币数值由阿拉伯数字自动生成为中文大写格式 如图是全部用Excel函数自编农业银行转帐支票套打工具，图中内容是需要打印到转帐支票上内容，其中A-D列为支票存根部分，我们利用Excel函数对要填写大部分内容建立公式后，只要输入支票存根部分的三项基本信息（A6-A8单元格）：收款单位、金额、用途，其他内容全部自动生成。 图中输入阿拉伯数字格式金额的是支票存根中A7单元格，要自动生成中文大写金额的是H3单元格，我们按照支票中的金额中文大写格式的特殊的要求，利用Excel函数对H3进行公式设置。 ????在H3单元格输入：=IF((A7-INT(A7))=0,TEXT(A7,[DBNUM2])元整,IF(