新建一TXT文件,将公式保存在里面,要用的时候,复制过去就可以了
就是需要前面有个¥符号吗?右键—设置单元格格式—数字分类下选择“货币”,小数位数、货币符号,设置好,确定就OK了。
单元格格式不用设置,直接用公式,比如说你有一个数字在单元格A1中,然后你想在B1输出大写金额,那就先打开记事本,把下面内容复制进记事本,查找E5,替换为A1,全部替换
=IF(ISNUMBER(E5)=FALSE,"输入非数字值",IF(E5>=0,IF(ROUND(E5,2)=0,"零",IF(ROUND(E5,2)<1,"",TEXT(INT(ROUND(E5,2)),"[dbnum2]")&"元")&IF(INT(ROUND(E5,2)*10)-INT(ROUND(E5,2))*10=0,IF(INT(ROUND(E5,2))*(INT(ROUND(E5,2)*100)-INT(ROUND(E5,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(E5,2)*10)-INT(ROUND(E5,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(E5,2)*100)-INT(ROUND(E5,2)*10)*10)=0,"整",TEXT((INT(ROUND(E5,2)*100)-INT(ROUND(E5,2)*10)*10),"[dbnum2]")&"分")),IF(ROUND(ABS(E5),2)<1,"","负"&TEXT(INT(ROUND(ABS(E5),2)),"[dbnum2]")&"元")&IF(INT(ROUND(ABS(E5),2)*10)-INT(ROUND(ABS(E5),2))*10=0,IF(INT(ROUND(ABS(E5),2))*(INT(ROUND(ABS(E5),2)*100)-INT(ROUND(ABS(E5),2)*10)*10)=0,"","零"),TEXT(INT(ROUND(ABS(E5),2)*10)-INT(ROUND(ABS(E5),2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(ABS(E5),2)*100)-INT(ROUND(ABS(E5),2)*10)*10)=0,"整",TEXT((INT(ROUND(ABS(E5),2)*100)-INT(ROUND(ABS(E5),2)*10)*10),"[dbnum2]")&"分")))
替换完之后复制一下所有内容,贴到B1里就行了。
设置单元格格式即可完成转换。
具体操作:
选中单元格,右键菜单”设置单元格格式“,选”数字“--”分类“--”特殊“--”中文大写与数字“,确定即可。