请教一个人民币大写公式,如附件所示

hp2004004 · 发表于 2011-2-16 01:16

Book1.rar (4.62 KB, 下载次数: 175)

[ 本帖最后由 hp2004004 于 2011-2-16 01:19 编辑 ]

wshcw · 发表于 2011-2-16 01:45

=SUBSTITUTE(SUBSTITUTE(IF(-RMB(F21),TEXT(F21,";负")&TEXT(INT(ABS(F21)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(F21),2),"[dbnum2]0角0分;;整"),),"零角",IF(F21^2<1,,"零")),"零分","整")

hp2004004 · 发表于 2011-2-18 00:43

谢版主，已完美解决！再次感谢！

西瓜味宅宅 · 发表于 2011-3-1 14:09

这个公式收藏了~~

lairenhei · 发表于 2011-12-9 09:44

积极采用。。。。。。Thanks!

evelyn199012 · 发表于 2012-3-12 17:03

原来是这样。。。。

tlog · 发表于 2012-3-13 15:45

=IF(ISERROR(FIND(".",G106)),NUMBERSTRING(INT(G106),2)&"元整",IF(ISERROR(NUMBERSTRING(MID(G106,FIND(".",G106)+2,1),2)),NUMBERSTRING(INT(G106),2)&"元"&NUMBERSTRING(MID(G106,FIND(".",G106)+1,1),2)&"角整",NUMBERSTRING(INT(G106),2)&"元"&NUMBERSTRING(MID(G106,FIND(".",G106)+1,1),2)&"角"&NUMBERSTRING(MID(G106,FIND(".",G106)+2,1),2)&"分"))

姚花花 · 发表于 2012-4-2 13:58

=IF(ABS(H24)<0.005,"",IF(H24<0,"负",)&IF(INT(ABS(H24)),TEXT(INT(ABS(H24)),"[dbnum2]")&"元",)&IF(INT(ABS(H24)*10)-INT(ABS(H24))*10,TEXT(INT(ABS(H24)*10)-INT(ABS(H24))*10,"[dbnum2]")&"角",IF(INT(ABS(H24))=ABS(H24),,IF(ABS(H24)<0.1,,"零")))&IF(ROUND(ABS(H24)*100-INT(ABS(H24)*10)*10,),TEXT(ROUND(ABS(H24)*100-INT(ABS(H24)*10)*10,),"[dbnum2]")&"分","整")) H24为要转换的小写金额所在单元格

lihui3265 · 发表于 2012-5-14 13:33

这个公式收藏了~~

carol_heart · 发表于 2012-5-15 15:12

真方便不过excel2007版本里面没有选项吗?将阿拉伯数字编程大写的

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

请教一个人民币大写公式,如附件所示

回复 2楼 wshcw 的帖子