各位大佬，数字转换大写形式，请赐教简单的公式

酱香茅台

原文里面的公式：=IF(G3>=0,,"负")&TEXT(ABS(G3)-MOD(ABS(G3),1),"[dbnum2]")&IF(MOD(G3,1)=0, "元整", "元")&SUBSTITUTE(SUBSTITUTE(TEXT(MOD(ABS(G3),1)*100,"[dbnum2]0角0分"),"零角",),"零分",)
这个公式太长了，请问各位大佬有没有简单的公式。请赐教

委鬼青见

这长度正常吧。要更简单的就直接设置单元格格式了

飘逝

你想要多短？
=SUBSTITUTE(TEXT(INT(A1),"[DBNUM2]")&"元"&TEXT(MOD(A1,1)*100,"[DBNUM2]0角0分;;"),"零分",)或者：
=SUBSTITUTE(NUMBERSTRING(A1,2)&"元"&TEXT(MOD(A1,1)*100,"[DBNUM2]0角0分;;"),"零分",)

悦夜

试试：=TEXT(INT(O2),"[dbNum2]")&"元"&SUBSTITUTE(TEXT(MOD(O2,1)*100,"[>0][dbnum2]0角0分;"),"零分",)

江南鸿鹰

这个主意不错，谢谢大佬

谷先森森森森

谢谢大佬，看到了

阿涛好靓仔

谢谢大佬分享新的公式，又学到了

吾心存敬畏

测试了一下，很对，而且简单好记，非常感谢大佬。

刘冲

返回的结果如果按人民币大写规范来讲，上面楼层里提供的所谓短公式，都是错误的，包括楼主自己的公式
=TEXT(INT(A1),"[dbnum2]G/通用格式元;;")&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(A1),2),"[dbnum2]0角0分;;整"),"零角",IF(A1^2<1,,"零")),"零分","整")