在EXCEL设置一个格式能自动将数值转换成中文大写数值的格式,如1625.35转为人民币壹仟陆佰贰拾伍元叁角伍分

来源:百度知道 编辑:UC知道 时间:2024/05/31 15:11:14

假设你的数值在a1,则放结果的单元格
=TEXT(INT(A1),"[dbnum2]")&IF(INT(A1)=A1,"元整","元")&IF(ISERROR(FIND(".",A1))=TRUE,"",IF(LEN(A1)-FIND(".",A1)=1,TEXT(RIGHT(A1,1),"[dbnum2]")&"角",IF(AND(LEN(A1)-FIND(".",A1)=2,MID(A1,LEN(A1)-1,1)<>"0"),TEXT(MID(A1,LEN(A1)-1,1),"[dbnum2]")&"角"&TEXT(RIGHT(A1,1),"[dbnum2]")&"分","零"&TEXT(RIGHT(A1,1),"[dbnum2]")&"分")))

假设你的金额存放在I5,在你要显示大写金额的单元格内输入以下公式:
=IF(TRUNC(I5)=I5,TEXT(TRUNC(I5),"[dbnum2]G/通用格式"&"元整"),IF(TRUNC(ROUND((I5-INT(I5))*10,2))=ROUND((I5-INT(I5))*10,2),TEXT(TRUNC(I5),"[dbnum2]G/通用格式"&"元")&TEXT(TRUNC(ROUND((I5-INT(I5))*10,2)),"[dbnum2]G/通用格式"&"角整"),TEXT(TRUNC(I5),"[dbnum2]G/通用格式"&"元")&TEXT(TRUNC(ROUND((I5-INT(I5))*10,2)),"[dbnum2]G/通用格式"&"角")&TEXT((ROUND((I5-INT(I5))*10,2)-T