转：Excel中数字转大写
=IF(C13=0,"",IF(C13<0,"负","")&SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(INT(ABS(C13)),"[DBNum2]")&"元"&TEXT(RIGHT(TEXT(C13,".00"),2),"[DBNum2]0角0分"),"零角零分","整"),"零分","整"),"零角","零"),"零元零",""))
=IF(C13=0,"",IF(C13<0,"负","")&SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(TEXT(INT(ABS(C13)),"[DBNum2]")&"元"&TEXT(RIGHT(TEXT(C13,".00"),2),"[DBNum2]0角0分"),"零角零分","整"),"零分","整"),"零角","零"),"零元零",""))
