将负数在EXCEL中转换成大写

duyu19810000 · 发表于 2005-7-13 23:02:00

请高手指点一二,如何可以在EXCEL中将负数转化成大写金额.如:-125.25元转化为

负壹佰贰拾伍圆贰角伍分

晓月清风 · 发表于 2005-7-13 23:43:00

方法一：使用下列公式（将A1改为数值所在单元格即可）

=IF(A1<0,"负","")&IF(TRUNC(ROUND(A1,2))=0,"",TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元")&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"分","整")

方法二：下载并使用下面的加载宏，在单元格中输入：=chmoney(A1) 即可

duyu19810000 · 发表于 2005-7-15 19:12:00

!!!如果没有你帮我的话,我过不了多久头发可能就会白的,再次谢谢!!!!!!!!我全力支持你做版主,做到天慌地老,海枯石烂.

sanqing · 发表于 2006-8-4 00:39:00

很好的,只是方法二打不开宏.

帐号		自动登录	找回密码
密码			注册

群介绍
Excel中国官方交流群2群 (331511605)
Excel中国官方群 (243419633)
Office China for Exc (498717031)
Excel交流群(纯技术) (324568243)
Excel VBA (122204306)

主题相关群

地区相关群[您还没设置居住地]

将负数在EXCEL中转换成大写

本帖子中包含更多资源

非常感谢!!!!如果再没有告诉我的话,我的头发就会白了,谢谢!!!

群介绍
主题无相 (随机显示版	同地区群块其他地区)