Excel小写转大写公式

小写转大写

公式一（带大写开头）

=IF(单元格-INT(单元格)=0,"（大写）"&TEXT(INT(单元格),"[DBNum2]G/通用格式")&"元整","（大写）"&TEXT(INT(单元格),"[DBNum2]G/通用格式")&"元"&IF(MID(ROUND(单元格-INT(单元格),2),3,1)="0","",TEXT(MID(ROUND(单元格-INT(单元格),2),3,1),"[DBNum2]G/通用格式"))&IF(MID(ROUND(单元格-INT(单元格),2),3,1)="0","零","角

")&IF(MID(ROUND(单元格-INT(单元格),2),4,1)="","整",TEXT(MID(ROUND(单元格

-INT(单元格),2),4,1),"[DBNum2]G/通用格式")&"分"))

公式二（不带大写开头）

=IF((INT(单元格*10)-INT(单元格)*10)=0,TEXT(INT(单元格),"[DBNum2]G/通用格式")&"元"&IF((INT(单元格*100)-INT((单元格)*10)*10)=0,"整","零"&TEXT(INT(单元格*100)-INT(单元格*10)*10,"[DBNum2]G/通用格式")&"分"),TEXT(INT(单元格),"[DBNum2]G/通用格式")&"元"&IF((INT(单元格*100)-INT((单元格)*10)*10)=0,TEXT((INT(单元格*10)-INT(单元格)*10),"[DBNum2]G/通用格式")&"角整",TEXT((INT(单元格*10)-INT(单元

格)*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(单元格*100)-INT(单元格

*10)*10,"[DBNum2]G/通用格式")&"分"))