补充一下,hjj5118 的意思我明白了。综合tangjiangli的答案,我教hjj5118 做:
第一步,打开已有的表格,同时把这个网页也打开,稍后能用到这个公式。因为公式太长,必须得用复制,粘贴的方法,才保准。
第二步,复制公式,冒号后一个也不能落下。
即:=SUBSTITUTE(SUBSTITUTE(IF(A1<0,"负","")&TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"分",IF(ROUND(A1,2)=0,"","整")),"零元零",""),"零元","") 。
第三步,双击进入A2,使A2单元格中有光标在闪,点粘贴。
第四步,回车。
可选用以下方法:
1、如果都是整数,可通过单元格格式设置实现。选定单元格,在其上点鼠标右键——“设置单元格格式”,点“数字”标签——“特殊”,在”类型“中选择“中文大写数字”。
2、如果存在小数,即不是元的整数,可用以下公式处理:
=IF(ISNUMBER(A1),IF(INT(A1),TEXT(INT(A1),"[dbnum2]")&"元","")&IF(MOD(INT(A1*10),10),TEXT(MOD(INT(A1*10),10),"[dbnum2]")&"角",IF(INT(A1)=A1,,IF(A1<0.1,,"零")))&IF(MOD(INT(A1*100),10),TEXT(MOD(INT(A1*100),10),"[dbnum2]")&"分",""),"")
如果单元格H14是小写数字,你想在其它单元格中显H14格的大写中文数字,就把下面的公式复制到你的目标单元格中,当然如果你的小写数字不是在H14格,只要把下面公式中的H14全换成你小写数字的单元格就可以了。
=IF(H14=0,"",CONCATENATE(IF(INT(ABS(H14))=0,"",TEXT(INT(ABS(H14)),"[DBNum2]G/通用格式元")),IF(INT(MID(RIGHT(FIXED(ABS(H14),2,1),2),1,1))=0,IF(INT(MID(RIGHT(FIXED(H14,2,1),1),1,1))=0,"",IF(INT(ABS(H14))=0,"","零")),TEXT(INT(MID(RIGHT(FIXED(H14,2,1),2),1,1)),"[DBNum2]G/通用格式角")),IF(INT(MID(RIGHT(FIXED(H14,2,1),1),1,1))=0,"整",TEXT(INT(MID(RIGHT(FIXED(H14,2,1),1),1,1)),"[DBNum2]G/通用格式分"))))
=IF(OR(F63="",F63=0),"",TEXT(INT(F63),"[dbnum2]")&IF(INT(F63)=F63,"元","元")&IF(INT(F63)<>F63,TEXT(--RIGHT(INT(F63*10)),"[=0]零;[>0][dbnum2]#角"),"")&TEXT(--RIGHT(INT(F63*100)),"[=0]整;[>0][dbnum2]#分整;;"))
复制此公式粘贴到A2,把F63全部改成A1就OK了。显示就是壹佰贰拾叁元肆角伍分整。
不好意思说错了,一点小错误应该是在A2处输入数字,在B2(或是其他任何单元格)处输入公式即可,因为一般都会有表头的
=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,"","整")),"零元零",""),"零元","")
你就会发现你想要的.不懂的你问问你们公司稍微会用EXCEL的就行了,
这个包灵,我自己用过的