ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: ldy

[分享]人民币大写函数TEXT终极版 1行(136字符)

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2009-9-29 14:21 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖已被收录到知识树中,索引项:数据格式转换
原帖由 name004 于 2008-7-13 14:20 发表
非常祝贺LDY斑竹的大作,基本查实不出毛病。我平时还是喜欢用这个版本,方便。(目标格a12),你不知道,有好多好多的菜鸟,你的函数导出模块就要为难他们,用不成!=IF(A12=0,"",IF(ABS(A12)>=1,IF(A12=TRUNC(A12),TEX ...

我也喜欢用这个公式,全面

TA的精华主题

TA的得分主题

发表于 2009-10-28 11:28 | 显示全部楼层

回复 84楼 ldy 的帖子

不错,太精彩了,这是“云南大理”推荐给我的,谢谢版主,谢谢“云南大理”!

TA的精华主题

TA的得分主题

发表于 2009-11-12 23:30 | 显示全部楼层

金额汉字大写

我组织了一些测试数据, 还整理了一些单元格公式, 标了颜色的单元格感觉语法表达与权威部门规定有偏差. 请大家审察.

单元格金额汉字大写转换公式.rar

63.45 KB, 下载次数: 79

TA的精华主题

TA的得分主题

发表于 2009-11-13 22:17 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

回复 120楼 xiaohw 的帖子

朋友,您的公式太恢宏了,谢谢您。

TA的精华主题

TA的得分主题

发表于 2009-11-13 22:34 | 显示全部楼层
LDY版主厉害,学习了。
谢谢版主分享。

TA的精华主题

TA的得分主题

发表于 2009-12-13 22:32 | 显示全部楼层
金额值的框架由"" "负" "零" "元" "零" "角" "整" "分"搭配而成,
金额值的整数部分由"亿" "万" "仟" "佰" "拾"组合而成。
数值则由大写的壹~玖、零替换。
汉字大写完整书写法要求每个零都要写出,
汉字大写缩略书写法则可减少一些零,而不改表达的意思,
且不易涂改伪造。

TA的精华主题

TA的得分主题

发表于 2010-1-10 16:28 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册

在金额的每个汉字后插入空格

如:壹佰壹拾叁元整
我们老大要求我弄成这样:壹 佰 壹 拾 叁 元 整
或者这样:壹  佰  壹  拾  叁  元  整
---
请问怎样用函数实现?

TA的精华主题

TA的得分主题

发表于 2010-2-8 12:50 | 显示全部楼层
楼主,如果使用隐藏函数NUMBERSTRING()可否再精简一点?

TA的精华主题

TA的得分主题

发表于 2010-2-10 10:35 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
精彩,学无止境!

TA的精华主题

TA的得分主题

发表于 2010-2-25 07:42 | 显示全部楼层
请各位版主及高人测试并指正!

=IF(A2<0,"负",)&TEXT(INT(ABS(A2)),"[DBNUM2]G/通用格式元;;零元;")&IF(MOD(A2,1)<>0,,"整")&TEXT(INT(MOD(ABS(A2),1)/1%+1%),"[DBNUM2]0角0分;;")

=TEXT(INT(A3),"[DBNUM2]G/通用格式元;负[DBNUM2]G/通用格式元;零元;")&IF(MOD(A3,1)<>0,,"整")&TEXT(INT(MOD(ABS(A3),1)/1%+1%),"[DBNUM2]0角0分;;")

[ 本帖最后由 一指禅 于 2010-2-25 11:36 编辑 ]
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-17 13:53 , Processed in 0.041281 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表