微软未公开的小写转大写函数,会计们有福了

nock · 发表于 2010-7-1 17:21

个微软未公开的小写转大写函数,会计们有福了

NumberString(1234567890,1) ＝一十二亿三千四百五十六万七千八百九

NumberString(1234567890,2) ＝壹拾贰亿叁仟肆佰伍拾陆万柒仟捌佰玖拾

NumberString(1234567890,3) ＝一二三四五六七八九

TEXT(1234567890,"[DBNum1]")=一十二亿三千四百五十六万七千八百九十

TEXT(1234567890,"[DBNum2]")=壹拾贰亿叁仟肆佰伍拾陆万柒仟捌佰玖拾

TEXT(1234567890,"[DBNum1]0")=一二三四五六七八九○

TEXT(1234567890,"[DBNum2]0")=壹贰叁肆伍陆柒捌玖零

jms126 · 发表于 2010-7-1 17:27

很好哦，不过好像有小数的话就自动四舍五入了

海婷 · 发表于 2010-7-1 17:28

如果有小数2位?

jylx · 发表于 2010-7-1 17:58

不错，谢谢公开

su11wei18 · 发表于 2010-7-1 18:04

谢谢分享，但是不够灵活

zhangzhenxia · 发表于 2010-7-1 18:04

原帖由 nock 于 2010-7-1 17:21 发表
个微软未公开的小写转大写函数,会计们有福了

NumberString(1234567890,1) ＝一十二亿三千四百五十六万七千八百九

NumberString(1234567890,2) ＝壹拾贰亿叁仟肆佰伍拾陆万柒仟捌佰玖拾

NumberString(1 ...

好像整数可以，非整数不行。

lu_zhao_long · 发表于 2010-7-1 18:20

原帖由 nock 于 2010-7-1 17:21 发表
个微软未公开的小写转大写函数,会计们有福了

NumberString(1234567890,1) ＝一十二亿三千四百五十六万七千八百九

NumberString(1234567890,2) ＝壹拾贰亿叁仟肆佰伍拾陆万柒仟捌佰玖拾

NumberString(1 ...

谢谢分享！

gaofuling · 发表于 2010-7-1 21:14

22.1 贰拾贰 33.5 叁拾肆
呵呵，小数位真的四舍五入了，不过还是很不错

吾股丰登 · 发表于 2010-7-1 21:37

貌似2003就有了隐藏函数来的
外国佬（不是鄙视的意思啦）开发的这个函数目前还不完全符合国人的要求

风起云动 · 发表于 2010-9-6 15:05

谢谢各位热心的帮助

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

[2007] 微软未公开的小写转大写函数,会计们有福了

评分

好