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

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(RI GHT(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