excel数字大小写转换

来源：百度知道 编辑：UC知道 时间：2024/06/15 18:45:05
需要把“小写”转换成“大写”，同时大写前面加上“人民币”。如果小写没小数点，大写就转换成“人民币*元整”。例如：123.00--人民币壹佰贰拾叁元整；1200.00--人民币壹仟贰佰元整；123.45---人民币壹佰贰拾叁元肆角伍分。

大写的话如果是角后面不是要带整字吗?好像分才不用。你先确定一下，如果角要带整的话公式里有两个地方有“角”，改第一个就可以，以下默认单元格A1为数字金额栏，具休位置有变把A1改一下就好：

=IF(INT(A1)*100=A1*100,"人民币"&TEXT(INT(A1),"[DBNum2]")&"元整",IF(INT(A1*10)=A1*10,"人民币"&TEXT(INT(A1),"[DBNum2]")&"元"&TEXT(A1*10-INT(A1)*10,"[DBNum2]")&"角","人民币"&TEXT(INT(A1),"[DBNum2]")&"元"&IF(INT(A1*10)=INT(A1)*10,"零",TEXT(RIGHT(INT(A1*10)),"[DBNum2]")&"角")&TEXT(RIGHT(A1*100),"[DBNum2]")&"分")
)

很奇怪的需求。
假如62.40在A1，公式为
=TEXT(A1*100,"0 0 0万0仟0佰0拾0元0角0分[DBNum2]")

=IF(G213<0,"无效数值",IF(G213=0,"",IF(G213<1,"",TEXT(INT(G213),"[dbnum2]")&"元")&IF(INT(G213*10)-INT(G213)*10=0,IF(INT(G213)*(INT(G213*100)-INT(G213*10)*10)=0,"","零"),IF(AND((INT(G213)-INT(G213/10)*10)=0,INT(G213)>0),"零"&TEXT(INT(G213*10)-INT(G213)*10,