Excel环境下金额数字大写转换的方法探讨

＝
１ ，Ｅ Ｔ（ ２ ” ｄ ｎｍ ｔ ＆” 整” Ｌ Ｆ （ Ｅ Ｔ Ｅ ， 表 函数 。 ６ Ｔ Ｘ Ｅ ， ［ ｂ ｕ ２］ ） 元 １ ，Ｅ Ｔ Ｔ Ｘ （ ２ ”
［ｂ ｕ ２ ． ，Ｉ Ｄ（ ． ， Ｅ Ｔ Ｅ ， ［ ｂ ｕ ２］ ） １ ｄ ｎｍ ］Ｉ ＦＮ ” ” Ｔ Ｘ （ ２ ” ｄ ｎ ｍ ｔ ， ）一１ ３ 自定义 函数法 的比较 ） ｔ ）
对 财 务 会 计 相 关 数 据 的 管理 和规 定格 式 的 输 出。
［ 关键词 ］ 大写转换 ； 数据管理 ； ｘｅ公 式； Ｅ ｃｌ 自定义函数
［ 中图分类号 ］ ２２ Ｆ ３ ［ 文献标识码 ］ Ａ ［ 文章编 号］６ ３— １４ ２０ ）６— ０ ２— ２ １７ ０ ９ （０ ９ ０ ０ １ ０ 款单的填写等。手 工填 写大写 数字 ， 时会 出现错误 ， 能 有 如 在计算机 中实现金额数字大写的 自动转换 ， 则不用专 门的计 算机程序 ， 就可实现对财务会计相关数据 的管理 和按 规定输
对仟位上的数字转换公式 ：
＝Ｉ （ Ｅ （ Ｅ Ｔ（Ｎ （ １ ，＃ ） Ｆ Ｌ Ｎ Ｔ Ｘ Ｉ Ｔ Ｅ ） ” ” ）＞ ＝ Ｍ Ｄ ” 壹 ４， Ｉ Ｂ（ 零
ｘｄ ｚ ＝ ＩＳ （ ， ｒ ｄｓ ） ． ） ｓｗ ｎ ｔ １ Ｔ ｉ ｘｔ ，” ” ｒ ｍ（ ｒ ＸＷ ＝ Ｍ ｄ ｄｓ ， ｓｗ ＋ １ Ｓ ｉ（ ｘｔ ｘｄ ｚ ｒ ） ｄ ｌ ＝ Ｌ ｆ ｄｓ ， ｓｗ 一 １ ｘ ｅ （ ｘｔ ｘｄ ｚ ｔ ｒ ）＆ ” ” 元
Ｉ ＩＳｒ １ ｄ ｓ ， ． ） ： ０Ｔ ｅ ｆ ｎｔ（ ， ｘｔ ” ” ｒ ｈｎ ｄ ＝ ｄｓ ＆ ” 整 ” ｘ ｘｔ ｒ 元
Ｅｌｅ ｓ
贰叁肆伍陆柒捌玖拾 ” Ｖ Ｌ Ｅ（ Ｄ （Ｎ （ １ ，Ｅ Ｔ Ｘ ， Ａ Ｕ ＭＩ Ｂ ＩＴ Ｅ ） Ｌ Ｎ（ Ｅ Ｔ
（Ｎ （ １ ，＃ ） ４ １ ） ２＋１２ ， ” 。 Ｉ Ｔ Ｅ ） ” ” ）一 ， ） ， ） ” ）
２０ ０ ９年 ３月
中 国 管
理
信
息
化
Ｍ ａ ．． ０ｏ ｒ ２ ９ Ｖｏ．１ Ｎｏ ６ １ ２， ．
第 ｌ ２卷第 ６期
Ｃｈｎａ Ｍ ａ ｇ ｍｅ ｎ ｏ ｍａｉｎｉａ ｉｎ ｉ ｎａ ｅ ｎｔＩ ｆ ｒ ｔｏ ｚ ｔｏ
Ｅ ｃｌ ｘｅ环境下金额数字大写转换 的方法探讨
贰叁肆伍陆柒捌玖拾” Ｖ Ｉ Ｅ（ １ Ｂ（Ｎ （ １ ，Ｅ Ｔ Ｘ ， Ａ Ｍ Ｄ Ｉ Ｔ Ｅ ） Ｌ Ｎ（ Ｅ Ｔ Ｕ
（Ｎ （ １ ，＃ ） ３ １ ）￥ Ｉ Ｔ Ｅ ） ” ” ）一 ， ） ２＋１２ ，” 。 ， ） ” ）
Ｉ Ｌ ｎ ＸＷ ＝ １Ｔ ｅ ｆ ｅ（Ｓ） ｈｎ
无 元角分 等字样 。注意参 数”［ ｂｕ ２］ 是 函数 Ｔ Ｘ （ 转 ｄｎｍ ” ＥＴ ）
Ｅｎｄ Ｉ ｆ
换 为大写的关键 。接 着再根 据 转换 结果 中有 无小 数点 以及
有无角分位 的情 况分别加 上“ 整” “ 元 、 角整 ” “ 、 零几分 ” “ 、 几
角几分 ” 。如将 Ｅ ２单 元格 的数字 转换 ， 在 Ｆ 可 ２单元 格 输入
ｘｏ ＝ ｄ ｔｄ ｘ Ｅｎｄ Ｆｕ ｔｏ ｎｃｉ ｎ
如下公式 ， 可将 Ｅ 就 ２单元格的小写数字转换为大写 ：
注意 ， Ｖ ｓａ Ｂ ｓ 在 ｉ ｌ ａｉ ｕ ｃ语句 中可 以使用 Ｅ ｃｌ工 作表 函 ｘｅ
需要通过 Ａ ｐｉ ｔ ｎ ＷｏｋｈｅＦ ｎｔ ｎ对象 来使用 工作 ｐ ｌ ａ ｏ ． ｒｓｅｔｕｃｉ ｃｉ ｏ ＝ Ｆ Ｔ Ｐ ＦＮ ” ” Ｔ Ｘ Ｅ ” ｄ ｎ ｍ ］＇ ， ） 数 ， Ｉ （ Ｙ Ｅ（ Ｉ Ｄ（ ． ， Ｅ Ｔ（ ２， ［ ｂ ｕ ２ ＇ １ ） ）
Ｐ ｂｉ Ｆ ｎｔ ｎｘ ｄ Ａ ｃＡ ｏｂｅ ｓ ｔｎ ｕ ｌ ｕ ｃｏ ｔ （ ｂ ｓＤ ｕ ｌ）Ａ ｒ ｇ ｃ ｉ ｏ Ｓｉ
ｂｎｌ ＝ Ａ ｐｉ ｔ ｎ ＷｏｋｈｅＦ ｎｔ ｎ Ｆｘｄ Ａ ｃ ２ ｉｔ ｐ ｌ ａ ｏ． ｒｓｅｔｕ ｃ ｏ． ｉ （ ｂ ， ） ｃｉ ｉ ｅ
ｄ ｓ ： Ａｐ ｌ ａｉｎ ｘｔ ｒ ｐｉ ｔ ．Ｗｏｋ ｈ ｅＦ ｎ ｔ ｎ ｅｔ（ｂｎｌ， ” ｃ ｏ ｒ ｓｅ ｔｕ ｃｉ ．Ｔ ｘ ｏ ｉｔ
用Ｖ Ｂ语 言通过 编写 程序将 小写 数字转 换 为大写 数字 ， 由于编程难度大 ， 在实 际工作 中一般很少使 用。
２ ２ ２公 式 法 ．．
ｄ２ ＝ Ｍｉ（Ｓ １ ）＆ ” ” ＆ Ｍ ｄ ＸＷ ，１ ｘ ｄ ＸＷ， ，１ 角 ｉ （Ｓ ，２ ）＆ ” 分”
Ｅｎ ｆ ｄＩ
种方法 ， 使用者要根据 自身的兴趣 和水 平来选择适 合 自己的
方 法
主 要参 考 文 献
［ ］ ・ 巴赫． ｘｅ ２０ １沃 肯 Ｅ ｃｌ ０ ３公式 与函数应用宝典 ［ ．路 晓村 ， Ｍ］ 等
图 １ 模 拟 运 算 表 对 话 框
１ ／ＣＨｆ ＭＡＮＡＧＥ ２ ＮＡ ＭＥＮＴ Ｉ ＯＲ ＡＴＯＮＩＡＴ ＯＮ ＮＦ Ｍ Ｉ Ｚ Ｉ
在实际工作 中 ， 公式法 是最容 易理解 的方法 。基 本思路
是利用函数 Ｔ Ｘ （ ２ ” ｄ ｎ ｍ ｔ 将 指 定单元 格 （ ２ 的 Ｅ Ｔ Ｅ ， ［ ｂｕ ２］ ） Ｉ Ｅ） 小写数字 ， １０ ２４ 如 ０ ．５转换为大写数字“ 壹仟零 贰． 肆伍 ” 但 ，
ｄ ＝ ｄ ＆ ｄ ２ ｘ ｘ１ ｘ
元 ” Ｉ （ Ｅ （ Ｄ Ｔ Ｘ （ ２ ” ｄ ｎ ｍ ］１ ， ＩＤ（ ． ， ＆ Ｆ Ｌ Ｎ ＭＩ （ Ｅ Ｔ Ｅ ， ［ ｂ ｕ ２ ｜ ＦＮ ” ” ）
编 写 自定 义 函数 时 ， 参 数 应 作 为 双 精 度 数 据 类 型 其
Ｔ Ｘ （ ２ ” ｄｎ ｍ ］ ） １ Ｅ Ｔ Ｅ ， ［ ｂ ｕ ２ ｔ ， ）＋１ ２ ）＝１ ＭＩ Ｔ Ｘ Ｅ ， １ ，） ， Ｄ（ Ｅ Ｔ（ ２ ” “ ｏｂｅ 定义 ， ｘ ｄ Ａ ｃＡ ｏ ｂｅ ， 能作 为单精度数据 Ｄ ｕ ｌ” 即 ｔ （ ｂ ｓＤ ｕ ｌ） 不 ｏ
王 光 伟
（ 重庆 市 长 寿 区人 民 医院 ， 重庆
［ 摘
４ １２ ） ０ ２０
要］ 金额数字 大写在 会计工作 中有广泛 的运 用， 如支票、 领款单的填写等。人 工转换 大写数字 ， 时会 出现错 有
误， 本文探讨 了在 Ｅ ｃｌ ｘｅ 环境下利用带”［ ｂ ｕ ２ ” ｄ ｎｍ ］ 参数的 Ｔ Ｘ （ 函数进行金 额数字 大写的转换 方法 ， ＥＴ ） 主要 用 于
３９０ ２ １９０ ８
２ ０
２ １
Ｎ０２ ００
Ｎ ∞３ ｄ
李
刘
强
畅
３７０ ５
２８０ ８
２ ２
２ ３
Ｎ ０４ ００
Ｎ ｏ５ ｏ０
钱Hale Waihona Puke Baidu
楚
进
欢
２７ ｏ ６
３３０ ５
２ ４
２ ５
Ｎ ０６ ０Ｈ ０
Ｎ （７ ｏｏ ）
徐
邓
言
爽
３９ ０ ２
２２整体转换 ．
２２ １编 程 法 ．．
ｄ２ ＝ Ｍ ｄ Ｔｉ ｄｓ ） ｓｗ ｘ ｉ（ ｒ ｍ（ ｘｔ ，ｘｄ ｚ＋ １ ）＆ ” ｒ ， ，１ 角整”
Ｅｓ ｆ ｉ（Ｓ １ １ ＝ ” ”Ｔ ｅ ｌ Ｉ Ｍ ｄ ＸＷ， ， ） ｅ 零 ｈｎ ｄ２ ＝ ｘｗ ＆ ” ” ｘ ｓ 分
Ｅｌｅ ｓ
出格 式 的 打 印 。
１ 数 字 大 写 转换 的意 义
金额 数字 大 写 在 会 计 核 算 中 有 广泛 的运 用 ， 支票 、 如 领
［ 收稿 日期］ ０ ８— ９—２ ２０ ０ ４ ［ 作者简介］ 王光伟（ ９ ６ ）男 ， １６ ， 重庆人 ， 重庆市 长寿 区人 民医 院 总 会 汁 师 ， 计‘ 、 师 。 统 师 会计
＝Ｅ ４ ｌ
Ｎ０１ ００
Ｎ）０ 【Ｈ Ｏ２
ｌ ９
Ｎ０ １ ｏ０
张
健
２９０ ６
４ ５ ６
７ ８
Ｎ ｏ３ ０ｏ Ｎ ０４ ｏ０ Ｎ０５ ｏｏ
Ｎｏ６ ０Ｏ Ｎ） ７ ｆｏ ｏ
刘 钱 楚
徐 邓
畅 进 欢
言 爽
２８ ０ ８ ２７ ０ ６ ３３０ ５
译 ．北 京 ： 电子 工 业 出 版社 ，０ ２ １６ —１０ ２０ ：５ ６
会 计 信 息化
２ 大写转换 的方法
２ １对 位 转 换 ．
数 。如下宏代码定 义函数 ｘｏ ， ｔｄ 可将小写转换为大 写 ， 使用 时
在单元格 中输入 “＝ｘ ｄ ） 即可 ， ｔ（” ｏ 非常方便 。
１９０ ８
９
ｌ ０
Ｎ ８ （０ ｏ
何
佳
２ １ｏ ｏ
２ ６
２ ７
Ｎ０８ ００
何
佳
２ｌＨ Ｏ ０
（ ）用 公 式 复 制 功 能 将 Ｄ ３ ２单 元 格 中 的 公 式 复 制 到 Ｄ ３ 至Ｄ ９单 元 格 。
（ ）对 话框 中 的第 １个 参数 不 添 ， ２个 参数 添 ８Ｅ ３ 第 ￥１ ， ２ 然后点击确定 。Ｄ ９到 Ｄ ６自动计 算 出对应 的“ １ ２ 应缴
表２
Ａ Ｂ
综 合 公 式
Ｃ Ｄ
表３
Ａ Ｂ
模 拟运 算 表
Ｃ Ｄ
ｌ ２
３
编
号
姓 张
李
名 健
强
应 纳 税 金 额 ２９ ０ ６
３７ ０ ５
应缴 所 得 税
１ ７
１ ８
编
号
姓
名
应 纳 税 金 额
＝ Ｅｌ ２
应 缴 所 得 税
对位转 换就 是对相 应数 位上 的小写 数字转 换 为大写 数 字， 然后在 已印有万仟佰十 元角分 的汉字之 问套打 相应数 位
的大写数字 ， 如对 Ｅ 单 元格万位上 的数字 ， １ 其大写 转换公 式
为：
＝
［ Ｂ ｕ ２ ｆ Ｄ Ｎ ｍ １１ ）
Ｉ（ Ｅ Ｔ Ｘ （Ｎ （ １ ， ＃ ） Ｆ Ｌ Ｎ（ Ｅ Ｔ Ｉ Ｔ Ｅ ） ” ” ）＞ ＝ ， Ｄ （ 零 壹 ５ ＭＩ Ｂ ”
［ ｂ ｕ ２ ’ ，Ｉ Ｄ（ ． ， Ｅ Ｔ（ ２ ”［ ｂ ｕ ２］ ） １ ｄｎ ｍ ］ ） ＦＮ ” ” Ｔ Ｘ Ｅ ， ｄｎ ｍ ｔ ， ）＋１ 类型“ ｉ ｌ 定义 ， ． ｜ ， Ｓｎ ｅ ｇ” 否则 ， 转换 将 出现偏差 。如 １． １ ３ １５元 ， 双
１ ＆” ） 角整 ” Ｉ （ Ｄ（ Ｅ Ｔ Ｅ ， ［ ｂ ｕ ２ ’ ， Ｉ Ｄ（ ． ， 精度转换为“ ， ＭＩ Ｔ Ｘ （ ２ ” ｄ ｎ ｍ ］ ） ＦＮ ” ” Ｆ ． 壹拾 叁元壹 角贰分 ” 单精 度转换 为 “ ， 壹拾 叁元 Ｔ Ｘ （ ２ ”［ ｂｕ ２］＇ ， ）＋１ １ Ｅ Ｔ Ｅ ， ｄｎｍ ｜ １ ） ， ）：”零 ” ”零 ”＆ Ｄ 壹 角壹 分 ” ， ＭＩ 。 （ Ｅ Ｔ （Ｅ ， ＴＸ ２ ”［ｄ ｎｍ ． ，ＦＮ （” ” Ｅ Ｔ （Ｅ ， ｂ ｕ ２］１ ） ＩＤ ． ，Ｔ Ｘ ２” ４ ［ ｂ ｕ ２］ ） １） ＋２ １）＆”分 ” ｄ ｎｍ ． ， ． ， ，（ＭＩ （ Ｅ Ｔ （ ２ ” Ｄ ＴＸ Ｅ ，
（ ）右键单击 １ ４ ８行的行标 ， 弹出菜单 中选择“ 隐藏” 。 （ ）注意 ， ５ 使用模拟运算表功能时 ， 必须保证 表 １和表 ３
在同一个工作簿 中。
六 、总 结
本文提供 的方法 ， 创新 点在 于“ 位函数 ” 定 的应用 ， 难点
在于综合公式中“ 数引用” 参 。用 Ｅ ｃｌ 算个 人所 得 税 有 多 ｘｅ 计
所得税” 。
五、 利用模拟运算表实现批量计算
模拟运算表为初学 者提供 了一 个替 代综合 公式 实现批
量计算的途径 。步骤如下 ： （ ）回到工作簿 Ｓ ｅｔ １ ｈｅ １中， 保持原有 的 Ａ １至 Ｄ ４单元 １ 格 中的内容 ， 录人数据 （ 见表 ３ 。 ） （ ）选 中 Ｃ ８至 Ｄ ６区域 ， ２ １ ２ 然后点 击 “ 数据 ” 菜单 中 的 “ 模拟运算 表” 弹 出对话框如图 １ ， 所示 。