001-资金大写.xls

IF(A1>=,TEXT(INT(ROUND(A1,2)),"[dbnum2]")&"元"&IF(ABS(ROUND(A1,0)-A1)<=,"整",TEXT(LEFT(RIGHT(TEXT(A1,".00"),2)),"[dbnum2]")&IF(ABS(A1-INT(A1))>=,"角","")&IF(A1*10-INT(A1*10)<,"整",TEXT(RIGHT(TEXT(A1,".00")),"[dbnum2]")&"分")),IF(A1<,"",IF(AND(A1>=,A1<),TEXT(RIGHT(TEXT(A1,".00")),"[dbnum2]")&"分",IF(AND(A1>=,A1<),TEXT(LEFT(RIGHT(TEXT(A1,".00"),2)),"[dbnum2]")&"角"&IF(RIGHT(TEXT(A1,".00"))*1=0,"整",TEXT(RIGHT(TEXT(A1,".00")),"[dbnum2]")&"分")))))

壹分
玖角玖分
壹元整
贰分
壹角壹分
壹角整
玖分
壹角壹分
壹角贰分
壹角壹分
壹元零伍分
贰元整
壹元玖角玖分
壹元贰角整
壹元贰角壹分
贰元整
壹元玖角玖分
壹元壹角伍分
壹元零伍分
壹元零陆分
壹佰贰拾叁万肆仟伍佰陆拾柒元零肆分

第一种情况:A1>=:
IF(A1>=,TEXT(INT(ROUND(A1,2)),"[dbnum2]")&"元"&
注释:,,该标注将出现“元”。
TEXT(INT(ROUND(A1,2)),前者取整后为1,后者为0。
IF(ABS(ROUND(A1,0)-A1)<=,"整",
注释:定义“元”之后,第一种情况:,即为整数元时,直接在元之后标“整”。
TEXT(LEFT(RIGHT(TEXT(A1,".00"),2)),"[dbnum2]")&
注释:只要不是整数元时,元之后的第一位数,无论是否是零,必须标出,比如:,则标为“玖元零伍分”。因此,必须先定义出元后的第一位大写数字。
在定义时,先将数字按四舍五入原则保留至小数点后两位,再以RIGHT取出小数部分后,以LEFT取小数点后的第一位。
IF(A1-INT(A1)>=,"角","")&
注释:,需要标出“角”。
IF(A1*10-INT(A1*10)<,"整",
注释:当角以后的值不足1分时,标出“整”。
TEXT(RIGHT(TEXT(A1,".00")),"[dbnum2]")&"分")),
注释:否则,标出“分”。
第二种情况:A1<
IF(A1<