Question

如何把excell表里数字变成会计专用大写带元角分的，谢谢！如果是公式，告诉我使用方法

=SUBSTITUTE(SUBSTITUTE(TEXT(TRUNC(FIXED(A1)),"[dbnum2]G/通用格式元;负[dbnum2]G/通用格式元;"&IF(A1>-0.5%,,"负"))&TEXT(RIGHT(FIXED(A1),2),"[dbnum2]0角0分;;"&IF(ABS(A1)>1%,"整",)),"零角",IF(ABS(A1)<1,,"零")),"零分","整")这个公式怎么使用？谢谢！

Answer 1

把公式复制到不是A1的地方，在A1中输入数值，那个公式自动会显示对应的大写
你的数值在哪个单元格，就把公式中的A1替换成哪个单元格

追问

不会操作。。。。。。

追答

复制下面的公式到B1单元格，A1输入11.99看看
=SUBSTITUTE(SUBSTITUTE(TEXT(TRUNC(FIXED(A1)),"[dbnum2]G/通用格式元;负[dbnum2]G/通用格式元;"&IF(A1>-0.5%,,"负"))&TEXT(RIGHT(FIXED(A1),2),"[dbnum2]0角0分;;"&IF(ABS(A1)>1%,"整",)),"零角",IF(ABS(A1)<1,,"零")),"零分","整")

追问

谢谢！"元"后面可以再加个零吗？例如：壹拾壹元零玖角玖分

追答

用我的这个
=IF(ROUND(A1,2)<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]")&"分")))

追问

“元”后面还是没有“零”

追答

零多余的，为什么一定要零呢

追问

税票要求，必须的。如果不可以的话没关系。非常感谢！

Answer 2

你选中要大写的单元格 点右键 选设置单元格格式下的数字 选特殊里面的人民币大写 点确定就可以了

Answer 3

把公式放到要大写的地方就行，我有execl样表，可以找我