[已解决]【求助】金额大写的函数有点问题需要修正，求高手帮忙！

风已随疯

359.05 这种类型的金额。
如果我用下面这个函数得到的结果是：叁佰伍拾玖元   伍分 （中间缺少一个：零）

=TEXT(INT(A1),"[DBNum2][$-804]G/通用格式")&"元"&IF((INT(A1*10)-INT(A1)*10)=0,"   ",TEXT(INT(A1*10)-INT(A1)*10,"[DBNum2][$-804]G/通用格式")&"角")&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT(INT(A1*100)-INT(A1*10)*10,"[DBNum2][$-804]G/通用格式")&"分")

希望大家能帮忙修改一下，在线等。谢谢！！！

最佳答案

月排行榜 / 总排行榜

ljzzlan

2011-3-29 21:02

=SUBSTITUTE(SUBSTITUTE(IF(A2<0,"负","")&TEXT(TRUNC(ABS(ROUND(A2,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A2,2))),"",TEXT(RIGHT(TRUNC(ROUND(A2,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A2,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A2,2),3))=".",TEXT(RIGHT(ROUND(A2,2)),"[DBNum2]")&"分",IF(ROUND(A2,2)=0,"","整")),"零元零",""),"零元","")

你试试这个公式？？？？

跳转到最佳答案楼层

wuxingai

我有

wuxingai

=IF(B1<0,"金额负无效",IF(OR(B1=0,B1=" "),"零元整",(IF(INT(B1)=0,"",TEXT(INT(B1),"[DBNum2][$-804]G/通用格式元")))&(IF((INT(B1*10)-INT(B1)*10)=0,"",TEXT((INT(B1*10)-INT(B1)*10),"[DBNum2][$-804]G/通用格式角")))&(IF((INT(B1*100)-INT(B1*10)*10)=0,"整",TEXT((INT(B1*100)-INT(B1*10)*10),"[DBNum2][$-804]G/通用格式分")))))

wuxingai

给个最佳答案吧

ljzzlan

=SUBSTITUTE(SUBSTITUTE(IF(A2<0,"负","")&TEXT(TRUNC(ABS(ROUND(A2,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A2,2))),"",TEXT(RIGHT(TRUNC(ROUND(A2,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A2,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A2,2),3))=".",TEXT(RIGHT(ROUND(A2,2)),"[DBNum2]")&"分",IF(ROUND(A2,2)=0,"","整")),"零元零",""),"零元","")

你试试这个公式？？？？

风已随疯

不正确啊。只是显示：叁佰伍拾玖元伍分 还是却一个零啊。
263.01显示的是：贰佰陆拾叁元整                       

ljzzlan

回复 风已随疯 的帖子

你看看ljzzlan的帖子，试过了，应该可行？？？？？？


注意：是从A2单元格开始的

风已随疯

我是从A2开始的啊

ljzzlan

你做个附件传上来看看呢？？？

风已随疯

谢谢你了，不用再上传附件了，试了两个公式，你的那个靠谱。