在Excel中输入小写金额怎样自动显示大写金额

Question

请教专家：

1，在Excel中输入小写金额怎样自动显示大写金额,同时在大写金额前面加“人民币大写”字样，大写金额后面添加（人民币代码和小写合计金额） ,

2，如果是要把其他几个单元的金额加总合计显示怎么设置？

麻烦专家请给与指导

Answer 1

假设小写金额在A1中，在B1中输入
="人民币大写￥"&IF(INT(A1)=0,"",TEXT(INT(A1),"[DBNum2]")&"元")&IF(OR(INT(A1*10)=0,INT(A1)=A1),"",IF(INT(A1*10)=INT(A1)*10,"零",RIGHT(TEXT(INT(A1*10),"[DBNum2]"),1)&"角"))&IF(INT(A1*100)=INT(A1*10)*10,"整",RIGHT(TEXT(ROUND(A1,2),"[DBNum2]"),1)&"分")追问

您好，好像转换后是：人民币大写￥壹佰元贰角伍分
人民币符合位置不对，我需要是这样：人民币大写壹佰元贰角伍分（￥100.25）
2，如果是我要把几个单元格的小写金额合计加总转换成大写金额怎么设置？
请指导！

追答

="人民币大写"&IF(INT(A1)=0,"",TEXT(INT(A1),"[DBNum2]")&"元")&IF(OR(INT(A1*10)=0,INT(A1)=A1),"",IF(INT(A1*10)=INT(A1)*10,"零",RIGHT(TEXT(INT(A1*10),"[DBNum2]"),1)&"角"))&IF(INT(A1*100)=INT(A1*10)*10,"整",RIGHT(TEXT(ROUND(A1,2),"[DBNum2]"),1)&"分")&"(￥"&A1&")"

至于直接加总转换的，只需将公式中的A1换成合计加总的公式如
="人民币大写"&IF(INT(SUM(A1:A10))=0,"",TEXT(INT(SUM(A1:A10)),"[DBNum2]")&"元")&IF(OR(INT(SUM(A1:A10)*10)=0,INT(SUM(A1:A10))=SUM(A1:A10)),"",IF(INT(SUM(A1:A10)*10)=INT(SUM(A1:A10))*10,"零",RIGHT(TEXT(INT(SUM(A1:A10)*10),"[DBNum2]"),1)&"角"))&IF(INT(SUM(A1:A10)*100)=INT(SUM(A1:A10)*10)*10,"整",RIGHT(TEXT(ROUND(SUM(A1:A10),2),"[DBNum2]"),1)&"分")&"(￥"&SUM(A1:A10)&")"

Answer 2

http://jingyan.baidu.com/article/a3761b2b8774331576f9aadc.html
人民币转大写的看下这个百度经验