[原创] 人民币大写转换金额大写，关于"零"的特殊需要公式

lunkuo

人民币大写转换，102000.00，一般中文写法为“壹拾万贰仟元整”，而有人喜欢写成“壹拾万零贰仟元整”，同样，20.34，一般写为“贰拾元叁角肆分”，也有人习惯写成“贰拾元零叁角肆分”。下面这条公式可满足“零”的这种特殊需要

=IF(ROUND(B3,2),TEXT(B3,";负")&SUBSTITUTE(SUBSTITUTE(TEXT(INT(ABS(B3)+0.5%),"[dbnum2]G/通用格式元;;"),"亿",TEXT(LEFT(RIGHT(FIXED(B3,2,1),12),2),"[>9]亿;[=]亿;亿零")),"万",TEXT(LEFT(RIGHT(FIXED(B3,2,1),8),2),"[>9]万;[=]万;万零"))&IF(B3^2<1,,TEXT(LEFT(RIGHT(RMB(B3),4),3),"[>=1]g;[=]g;零"))&TEXT(LEFT(RIGHT(RMB(B3),2)),"[dbnum2]0角;;"&IF((ROUND(B3,0)=ROUND(B3,2))+(B3^2<1),,"零"))&TEXT(RIGHT(RMB(B3)),"[dbnum2]0分;;整"),"")

这条公式考虑“亿零”“万零”“元零”的情况，追求实用。

人民币零写法

而下面是常规的人民币大写转换公式
=IF(ROUND(B3,2),TEXT(B3,";负")&TEXT(INT(ABS(B3)+0.5%),"[dbnum2]G/通用格式元;;")&IF((ROUND(B3,0)=ROUND(B3,2))+(ABS(B3)<9.5%),,TEXT(LEFT(RIGHT(RMB(B3),2)),"[dbnum2]0角;;零"))&TEXT(RIGHT(RMB(B3)),"[dbnum2]0分;;整"),"")

如需要更多的转换公式，可参考另外一个帖子http://club.excelhome.net/thread-752150-1-1.html

kuangben8

公式能写到这种程度！佩服啊。

lunkuo

如果处理“亿零”的情况比较少，那可简化成只处理“万零”、“元零”的情况，公式如下

1. =IF(ROUND(B3,2),TEXT(B3,";负")&SUBSTITUTE(TEXT(INT(ABS(B3)+0.5%),"[dbnum2]G/通用格式元;;"),"万",TEXT(LEFT(RIGHT(FIXED(B3,2,1),8),2),"[>9]万;[=]万;万零"))&IF(B3^2<1,,TEXT(LEFT(RIGHT(RMB(B3),4),3),"[>=1]g;[=]g;零"))&TEXT(LEFT(RIGHT(RMB(B3),2)),"[dbnum2]0角;;"&IF((ROUND(B3,0)=ROUND(B3,2))+(B3^2<1),,"零"))&TEXT(RIGHT(RMB(B3)),"[dbnum2]0分;;整"),"")

复制代码

soron

我真的真的服了

hzybit

公式好长，眼花了

。守墓人。

这个必须顶，真的很强大

ciscoyes

感谢大神，一直在找处理“零”特殊需要的公式都不怎么理想，这个确实不错。

Whiffle

楼主，太强大
{:soso_e179:}

AiReal_W

感谢大神，太有用了！！！自己一直整了好久都没整出来！

wb_1027

为毛我的显示是这样？
壹拾贰万零叁拾肆元,03叁角肆分