[小技巧]Excel的金额小写转换为大写的方法

victorstrife

这个方法也不过是网上搜的,既然同事用到了,就放上来吧...貌似对会计类职业的朋友比较有用?
打开Excel,然后在任意单元格粘贴以下代码:

=IF(A1<=0,,TEXT(INT(A1),"[dbnum2]人民币G/通用格式")&"元"&IF(INT(A1*10)-INT(A1)*10=0,IF(INT(A1)*(INT(A1*100)-INT(A1*10)*10)=0,"","零"),TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角")&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分"))

然后在A1(可自行修改此单元格位置)输入或粘贴数字就可以达到转换的效果,精确到分...

效果如下:
9999.99
人民币玖仟玖佰玖拾玖元玖角玖分

ajaxzhou2633

对我有用。。。。:victory:
PS：哎呀。。。很有趣~1至9不需要在打字:lol

[ 本帖最后由 ajaxzhou2633 于 2008-11-11 09:31 编辑 ]

allan_adeng

很有趣。。。收藏了，很有实用价值。。。

艾克斯

不知是否对金山也有同样的作用

慵懒悠悠

OFFICE应用能力...0....

夏夜晨星

收下，改某些游戏用

[ 本帖最后由 夏夜晨星 于 2008-11-11 18:00 编辑 ]