金额大小写自动转换
根据收款凭证的填制要求,合计处要填写合计的大写金额。倪小君可不想根据统计出来的数字,再重新输一遍大写的金额。有办法能把小写数字自动转化为大写数字吗?不要小看EXCEL,它的功能可是很强的。
1、取消工作表保护。
2、现在合计行内,进行金额的汇总。选择汇总单元格,使用SUM函数,对数据进行汇总计算。在单元格内,输入=SUM(J5:J14),即可。
3、然后,在合计大写金额单元格内,输入以下公式:
=IF(J15<0,"金额为负无效",
(IF(OR(J15=0, J15=""),"(人民币)零元",
IF(J15<1,"(人民币)",
TEXT(INT(J15),"[dbnum2](人民币)G/通用格式")&"元"))))&
IF(
(INT(J15*10)-INT(J15)*10)=0,
IF(INT(J15*100)-INT(J15*10)*10=0,"","零"),
(TEXT(INT(J15*10)-INT(J15)*10,"[dbnum2]")&"角"))
&IF(
(INT(J15*100)-INT(J15*10)*10)=0,
"整",
TEXT((INT(J15*100)-INT(J15*10)*10),"[dbnum2]")&"分")
备注:此公式来源于http://www.programfan.com/blog/article.asp?id=14275,根据此修改。
以上函数,主要实现两个功能。
一是当合计栏内数字为负数时,提示数字无效。
二是当合计栏内小写金额数字为正数时,把小写数字转化为大写数字。

除了以上函数外,还可以通过NUMBERSTRING函数实现,感兴趣的读者,可以自己找资料试试,两者有异曲同工之妙。
4、保护工作表。