Excel小写转大写公式

工作时经常需要实现这个功能，以往需要手工转换，过去也找过一些小程序进行转换，不过在小程序中显示好好的字符拷进excel中竟成了乱码，郁闷，现在有了这个公式，不用自己设置函数，直接拷贝＋替换就完成。很棒！ 在EXCEL中，假设A1为数字格式单元格，在任意单元格内粘贴下面公式即可显示大定金额：

=IF(A1<=0,,TEXT(INT(A1),"[dbnum2]人民币G/通用格式")&"元"&IF(INT(A1*10)-INT(A1)*10=0,IF(INT(A1)*(INT(A1*100)-INT(A1*10)*10)=0,"","零"),TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角")&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分"))