Excel数字小写金额转换汉字大写金额公式的简单设置.doc

文档介绍：Excel 数字小写金额转换汉字大写金额公式的简单设置 Excel 数字小写金额转换汉字大写金额公式在会计工作中是经常应用到的,它能提高工作效率和会计数据的准确性。网上有很多设置 Excel 数字小写金额转汉字大写金额公式的方法,基本上都很繁琐,且功能不全面(对负金额不能转换)。本人在 Excel 会计工作实践中,设计了一个数字小写金额转换汉字大写金额的公式,公式仅 500 多个字符,个人感觉还很满意,现拿出来供大家分享,不足之处,也请大家不吝赐教。公式如下: =IF(ROUND(A1,2)=0,"",IF(A1<0," 负","")&IF(ABS(A1)>=1,TEXT(INT(ROUND(ABS(A1),2)),"[dbnum2]")&" 元","")&IF( VALUE(MID(RIGHT(TEXT((ABS(A1)*100+100),"###"),2),1,1))=0,IF(VALUE(RIGHT(TEXT(ABS(A1)*100,"###"),1))=0," 整", IF(ABS(A1)>=1," 零","")&TEXT(VALUE(RIGHT(TEXT(ABS(A1)*100,"###"),1)),"[dbnum2]")&" 分"),IF(VALUE(RIGHT(TEXT(A BS(A1)*100,"###"),1))=0,TEXT(VALUE(MID(RIGHT(TEXT((ABS(A1)*100+100),"###"),2),1,1)),"[dbnum2]")&" 角整",TEXT (VALUE(MID(RIGHT(TEXT((ABS(A1)*100+100),"###"),2),1,1)),"[dbnum2]")&" 角"&TEXT(VALUE(RIGHT(TEXT(ABS(A1)*100, "###"),1)),"[dbnum2]")&" 分"))) 公式中 A1为小写金额所在单元格,实际使用中只需将其替换为实际小写金额所在单元格即可,非常方便。公式可以对正数、零(本公式转换为空白,与支票一致,如需转换为“零元整”,只需在公式第一个双引号内加入即可)、负数(会计数据有时也涉及到)均可进行转换。最近,在网上看到高手设计的更简洁的转换公式,缺点是只能把“0”转换为空白,不能转换为“零元整”,公式如下: =SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1)