EXCEL中将数字转为大写字的方法

在EXCEL中将数字转为大写，这在我们做报价单中常常用到的，输入大写很麻烦，可能还不会写，在表格中放入下面的判断条件语句将A1改为我们输入的常规数字单元格就可以自动转成大写了。

=IF(A1<0,REPLACE(IF(TRUNC(A1)=A1,TEXT(A1,"[DBNum2]")&"元整",IF(TRUNC(A1*10)=A1*10,TEXT(TRUNC(A1),"[DBNum2]")&"元"&TEXT(RIGHT(A1),"[DBNum2]")&"角整",TEXT(TRUNC(A1),"[DBNum2]")&"元"&IF(ISNUMBER(FIND(".0",A1)),"零",TEXT(LEFT(RIGHT(A1,2)),"[DBNum2]")&"角")&TEXT(RIGHT(A1),"[DBNum2]")&"分")),1,1,"负"),IF(TRUNC(A1)=A1,TEXT(A1,"[DBNum2]")&"元整",IF(TRUNC(A1*10)=A1*10,TEXT(TRUNC(A1),"[DBNum2]")&"元"&TEXT(RIGHT(A1),"[DBNum2]")&"角整",TEXT(TRUNC(A1),"[DBNum2]")&"元"&IF(ISNUMBER(FIND(".0",A1)),"零",TEXT(LEFT(RIGHT(A1,2)),"[DBNum2]")&"角")&TEXT(RIGHT(A1),"[DBNum2]")&"分")))