小写分栏金额转化为大写

linkehua2012 · 发表于 2012-8-23 23:51

小写金额是分栏填写的，如何把它转化为大写
论坛上看了好多，都只是把在同一个单元格的一串数字转为大写，求大侠帮忙了

linkehua2012 · 发表于 2012-8-24 00:28

无人回应吗，自己顶

wshcw · 发表于 2012-8-24 00:38

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

ice118 · 发表于 2012-8-24 01:27

3楼太厉害了，收藏了，谢谢！

linkehua2012 · 发表于 2012-8-26 15:53

有没有一步到位，不需要整合成N2里的数字再进行转化的！

等待de心 · 发表于 2012-8-26 17:08

学习啦~~财会之类的很需要

鄂龙蒙 · 发表于 2016-3-23 11:57

wshcw 发表于 2012-8-24 00:38
=SUBSTITUTE(SUBSTITUTE(IF(-RMB(N2,2),TEXT(N2,";(负)")&TEXT(INT(ABS(N2)+0.5%),"[dbnum2]G/通用格式元;; ...

请教：怎样用vba代码写？谢谢！

改分栏代码.rar (18.34 KB, 下载次数: 23)

lijian60 · 发表于 2016-6-27 16:03

非常实用，支持一个。

irishh · 发表于 2016-7-12 16:39

谢谢分享~收藏备用~

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

[求助] 小写分栏金额转化为大写