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
=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]"&"分"))))))))
下面附上两张图(角位正常,分位就不正常了)


