金额小写转大写（零万零仟零佰零拾零元零角零分的格式），大写也在一个单元格内

在B1中输入或复制粘贴下列公式
=IF(INT(A1)=A1,TEXT(A1,"[DBNUM2]")&"元整",IF(INT(A1*10)=A1*10,SUBSTITUTE(TEXT(A1,"[DBNUM2]"),".","元")&"角",IF(INT(A1*100)=INT(A1*100),REPLACE(SUBSTITUTE(TEXT(A1,"[DBNUM2]"),".","元"),LEN(SUBSTITUTE(TEXT(A1,"[DBNUM2]"),".","元")),,"角")&"分","")))
下拉填充
A列的数值最多保留2位小数