求大神修改下函数
excel吧
全部回复
仅看楼主
level 3
Ciao少了我 楼主
我做的那个表格是那个小写金额转换大写的。。。这个函数只能转换到“角”,怎么改成分也可以转换呢。PS:分是大写最后一个,没有“分整”的说法。
=IF(L7<0,"金额为负无效",IF(OR(L7=0,L7=""),"零元整",(IF(L7<1,IF(L7<0.1,TEXT(INT(L7*100),"[dbnum2]")&"分",IF(INT(L7*10)*10-INT(L7*100)=0,TEXT(INT(L7*10),"[dbnum2]")&"角整",TEXT(INT(L7*10),"[dbnum2]")&"角"&TEXT((INT(L7*100)-INT(L7*10)*10),"[dbnum2]")&"分")),TEXT(INT(L7),"[dbnum2]")&"元"&IF(INT(L7)*100-INT(L7*100)=0,"整",IF(INT(L7*10)-INT(L7)*10=0,"零"&TEXT((INT(L7*100)-INT(L7*10)*10),"[dbnum2]")&"分",IF(INT(L7*10)*10-INT(L7*100)=0,TEXT(INT(L7*10)-INT(L7)*10,"[dbnum2]")&"角整",TEXT(INT(L7*10)=INT(L7)*10,"[dbnum2]")&"角"&TEXT((INT(L7*100)-INT(L7*10)*10),"[dbnum2]"&"分"))))))))
下面附上两张图(角位正常,分位就不正常了)
2014年03月28日 13点03分 1
吧务
level 14
好壮观,556个字符,先依你的模式这样改吧!
=IF(A1<0,"金额为负无效",IF(ROUND(A1,2)=0,"零",IF(ROUND(A1,2)<1,"",TEXT(INT(ROUND(A1,2)),"[dbnum2]")&"元")&IF(INT(ROUND(A1,2)*10)-INT(ROUND(A1,2))*10=0,IF(INT(ROUND(A1,2))*(INT(ROUND(A1,2)*100)-INT(ROUND(A1,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(A1,2)*10)-INT(ROUND(A1,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(A1,2)*100)-INT(ROUND(A1,2)*10)*10)=0,"整",TEXT((INT(ROUND(A1,2)*100)-INT(ROUND(A1,2)*10)*10),"[dbnum2]")&"分")))
405个字符,还有很大的缩短空间,150个以下为目标如何?
2014年03月28日 14点03分 2
3Q[花心]厉害。。。我也只是刚刚学了点皮毛[笑眼]还要加油啊
2014年03月28日 14点03分
level 8
为什么要搞这么麻烦,直接调格式不就好了。
2014年03月28日 16点03分 3
1