酱香茅台 发表于 2021-11-5 10:56:00

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


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

委鬼青见 发表于 2021-11-24 18:09:54

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

飘逝 发表于 2021-12-12 07:23:05

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

悦夜 发表于 2021-12-12 21:25:24

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

江南鸿鹰 发表于 2021-12-14 04:09:34

这个主意不错，谢谢大佬

谷先森森森森 发表于 2021-12-14 13:09:18

谢谢大佬，看到了

阿涛好靓仔 发表于 2021-12-14 16:30:04

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

吾心存敬畏 发表于 2021-12-20 23:06:56

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

刘冲 发表于 2021-12-27 03:56:16

返回的结果如果按人民币大写规范来讲，上面楼层里提供的所谓短公式，都是错误的，包括楼主自己的公式
=TEXT(INT(A1),"G/通用格式元;;")&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(A1),2),"0角0分;;整"),"零角",IF(A1^2<1,,"零")),"零分","整")
页: [1]
查看完整版本: 各位大佬，数字转换大写形式，请赐教简单的公式