如何将阿拉伯小写数字转换成中文大写金额？

李海宾 · 发表于 2010-11-20 10:53

目前最完整也最简短,但拾万以上不加零(并且用TEXT(A1,";负")还能处理文本型数字)的人民币金额大写 (因RMB(A1)的省略写法还是有缺陷)有如下两个公式:
172个字符
=SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1,2),2),"[>9][dbnum2]0角0分;"&IF(A1^2<1,,0)&"[>][dbnum2]0分;整"),),"零分","整")
171个字符
=SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;整"),),"零角",IF(A1^2<1,,"零")),"零分","整")
完全能够完美解决,只是公式加到251个字符了:
=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;整"),),"零角",IF(A1^2<1,,"零")),"万",IF(AND(MOD(ABS(A1%),1000)<100,MOD(ABS(A1%),1000)>=10),"万零","万")),"零分","整")
如:1000103005.26
转换为:
壹拾亿零壹拾万零叁仟零伍元贰角陆分

hjsky · 发表于 2010-11-20 11:01

你还能自己想到两个公式解决，我就不行了

好象《函数与公式大全》有类似的

Cellfarmer · 发表于 2010-11-20 11:05

很经典的函数！希望EH能把这样的典型应用整理到专门的帖子便于查找。用站内搜找出一堆，还得逐个试。

lu_zhao_long · 发表于 2010-11-20 11:11

建议楼主可以试一下单元格格式设置 →特殊→中文大写数字。如果没有出现，则需要在“区域”框内选择“中国”。

原帖由 李海宾 于 2010-11-20 10:53 发表
目前最完整也最简短,但拾万以上不加零(并且用TEXT(A1,";负")还能处理文本型数字)的人民币金额大写 (因RMB(A1)的省略写法还是有缺陷)有如下两个公式:
172个字符
=SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT ...

lu_zhao_long · 发表于 2010-11-20 11:27

还有一个参考：
http://club.excelhome.net/viewth ... p;page=1#pid3983674

xiao-feng · 发表于 2010-11-20 11:32

学习一下

longgfengg · 发表于 2010-11-20 11:47

学习一下

zhuying0511 · 发表于 2010-11-21 12:36

我怎么看着有点乱

李海宾 · 发表于 2010-11-26 11:47

学习
谢谢

wgjxxx · 发表于 2010-11-26 12:08

谢谢楼主分享，学习了……

		自动登录	找回密码
密码			免费注册

[分享] 如何将阿拉伯小写数字转换成中文大写金额？

评分