|
|
发表于 2009-10-18 07:30:29
|
显示全部楼层
=TEXT(A1*100,"人民币0拾0万0仟0佰0拾0元0角0分[dbnum2]")
) p$ X" m9 r/ T
bbs.canet.com.cn+ I7 ^. R8 r: \0 N% G
无固定显示“人民币”时，
中国会计社区! d( ` y0 j$ P# h0 Y
=IF(A1<0,"无效数值",IF(A1=0,"",IF(A1<1,"",TEXT(INT(A1),"[dbnum2]")&"元")&IF(INT(A1*10)-INT(A1)*10=0,IF(INT(A1)*(INT(A1*100)-INT(A1*10)*10)=0,"","零"),IF(AND((INT(A1)-INT(A1/10)*10)=0,INT(A1)>0),"零"&TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角",TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角"))&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT(INT(A1*100)-INT(A1*10)*10,"[dbnum2]")&"分")))
" [; [: S& L" a& w* B' ^* N
' v d4 E( u6 O. r6 Z# U- M2 ~" d; E
=SUBSTITUTE(SUBSTITUTE(TEXT(TRUNC(FIXED(A1)),"[>0][dbnum2];[<0]负[dbnum2];;")&TEXT(RIGHT(FIXED(A1),2),"元[dbnum2]0角0分;;"&IF(ABS(A1)>1%,"元整",)),"零角",IF(ABS(A1)<1,,"零")),"零分","整") |
|
楼主: rxx169
