当前位置:文档之家› Excel环境下金额数字大写转换的方法探讨

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


对仟位上的数字转换公式 :
=I ( E ( E T(N ( 1 ,# ) F L N T X I T E ) ” ” )> = M D ” 壹 4, I B( 零
xd z = IS ( , r ds ) . ) sw n t 1 T i xt ,” ” r m( r XW = M d ds , sw + 1 S i( xt xd z r ) d l = L f ds , sw 一 1 x e ( xt xd z t r )& ” ” 元
xo = d td x End Fu to nci n
如下公式 , 可将 E 就 2单元格的小写数字转换为大写 :
注意 , V sa B s 在 i l ai u c语句 中可 以使用 E cl工 作表 函 xe
需要通过 A pi t n WokheF nt n对象 来使用 工作 p l a o . rsetuci ci o = F T P FN ” ” T X E ” d n m ]' , ) 数 , I ( Y E( I D( . , E T( 2, [ b u 2 ' 1 ) )
元 ” I ( E ( D T X ( 2 ” d n m ]1 , ID( . , & F L N MI ( E T E , [ b u 2 | FN ” ” )
编 写 自定 义 函数 时 , 参 数 应 作 为 双 精 度 数 据 类 型 其
T X ( 2 ” dn m ] ) 1 E T E , [ b u 2 t , )+1 2 )=1 MI T X E , 1 ,) , D( E T( 2 ” “ obe 定义 , x d A cA o be , 能作 为单精度数据 D u l” 即 t ( b sD u l) 不 o
种方法 , 使用者要根据 自身的兴趣 和水 平来选择适 合 自己的
方 法
主 要参 考 文 献
[ ] ・ 巴赫. xe 20 1沃 肯 E cl 0 3公式 与函数应用宝典 [ .路 晓村 , M] 等
图 1 模 拟 运 算 表 对 话 框
1 /CHf MANAGE 2 NA MENT I OR ATONIAT ON NF M I Z I
22整体转换 .
22 1编 程 法 ..
d2 = M d Ti ds ) sw x i( r m( xt ,xd z+ 1 )& ” r , ,1 角整”
Es f i(S 1 1 = ” ”T e l I M d XW, , ) e 零 hn d2 = xw & ” ” x s 分
Ele s
表2
A B
综 合 公 式
C D
表3
A B
模 拟运 算 表
C D
l 2



姓 张

名 健

应 纳 税 金 额 29 0 6
37 0 5
应缴 所 得 税
1 7
1 8




应 纳 税 金 额
= El 2
应 缴 所 得 税
对位转 换就 是对相 应数 位上 的小写 数字转 换 为大写 数 字, 然后在 已印有万仟佰十 元角分 的汉字之 问套打 相应数 位
的大写数字 , 如对 E 单 元格万位上 的数字 , 1 其大写 转换公 式
为:

[ B u 2 f D N m 11 )
I( E T X (N ( 1 , # ) F L N( E T I T E ) ” ” )> = , D ( 零 壹 5 MI B ”
译 .北 京 : 电子 工 业 出 版社 ,0 2 16 —10 20 :5 6
会 计 信 息化
2 大写转换 的方法
2 1对 位 转 换 .
数 。如下宏代码定 义函数 xo , td 可将小写转换为大 写 , 使用 时
在单元格 中输入 “=x d ) 即可 , t(” o 非常方便 。
P bi F nt nx d A cA obe s tn u l u co t ( b sD u l)A r g c i o Si
bnl = A pi t n WokheF nt n Fxd A c 2 it p l a o. rsetu c o. i ( b , ) ci i e
d s : Ap l ain xt r pi t .Wok h eF n t n et(bnl, ” c o r se tu ci .T x o it
出格 式 的 打 印 。
1 数 字 大 写 转换 的意 义
金额 数字 大 写 在 会 计 核 算 中 有 广泛 的运 用 , 支票 、 如 领
[ 收稿 日期] 0 8— 9—2 20 0 4 [ 作者简介] 王光伟( 9 6 )男 , 16 , 重庆人 , 重庆市 长寿 区人 民医 院 总 会 汁 师 , 计‘ 、 师 。 统 师 会计
贰叁肆伍陆柒捌玖拾” V I E( 1 B(N ( 1 ,E T X , A M D I T E ) L N( E T U
(N ( 1 ,# ) 3 1 )¥ I T E ) ” ” )一 , ) 2+12 ,” 。 , ) ” )
I L n XW = 1T e f e(S) hn
[ b u 2 ’ ,I D( . , E T( 2 ”[ b u 2] ) 1 dn m ] ) FN ” ” T X E , dn m t , )+1 类型“ i l 定义 , . | , Sn e g” 否则 , 转换 将 出现偏差 。如 1. 1 3 15元 , 双
1 &” ) 角整 ” I ( D( E T E , [ b u 2 ’ , I D( . , 精度转换为“ , MI T X ( 2 ” d n m ] ) FN ” ” F . 壹拾 叁元壹 角贰分 ” 单精 度转换 为 “ , 壹拾 叁元 T X ( 2 ”[ bu 2]' , )+1 1 E T E , dnm | 1 ) , ):”零 ” ”零 ”& D 壹 角壹 分 ” , MI 。 ( E T (E , TX 2 ”[d nm . ,FN (” ” E T (E , b u 2]1 ) ID . ,T X 2” 4 [ b u 2] ) 1) +2 1)&”分 ” d nm . , . , ,(MI ( E T ( 2 ” D TX E ,
无 元角分 等字样 。注意参 数”[ bu 2] 是 函数 T X ( 转 dnm ” ET )
End I f
换 为大写的关键 。接 着再根 据 转换 结果 中有 无小 数点 以及
有无角分位 的情 况分别加 上“ 整” “ 元 、 角整 ” “ 、 零几分 ” “ 、 几
角几分 ” 。如将 E 2单 元格 的数字 转换 , 在 F 可 2单元 格 输入
( )右键单击 1 4 8行的行标 , 弹出菜单 中选择“ 隐藏” 。 ( )注意 , 5 使用模拟运算表功能时 , 必须保证 表 1和表 3
在同一个工作簿 中。
六 、总 结
本文提供 的方法 , 创新 点在 于“ 位函数 ” 定 的应用 , 难点
在于综合公式中“ 数引用” 参 。用 E cl 算个 人所 得 税 有 多 xe 计
对 财 务 会 计 相 关 数 据 的 管理 和规 定格 式 的 输 出。
[ 关键词 ] 大写转换 ; 数据管理 ; xe公 式; E cl 自定义函数
[ 中图分类号 ] 22 F 3 [ 文献标识码 ] A [ 文章编 号]6 3— 14 20 )6— 0 2— 2 17 0 9 (0 9 0 0 1 0 款单的填写等。手 工填 写大写 数字 , 时会 出现错误 , 能 有 如 在计算机 中实现金额数字大写的 自动转换 , 则不用专 门的计 算机程序 , 就可实现对财务会计相关数据 的管理 和按 规定输

1 ,E T( 2 ” d nm t &” 整” L F ( E T E , 表 函数 。 6 T X E , [ b u 2] ) 元 1 ,E T T X ( 2 ”
[b u 2 . ,I D( . , E T E , [ b u 2] ) 1 d nm ]I FN ” ” T X ( 2 ” d n m t , )一1 3 自定义 函数法 的比较 ) t )
=E 4 l
N01 00
N)0 【H O2
l 9
N0 1 o0


290 6
4 5 6
7 8
N o3 0o N 04 o0 N05 oo
No6 0O N) 7 fo o
刘 钱 楚
徐 邓
畅 进 欢
言 爽
28 0 8 27 0 6 330 5
390 2 190 8
2 0
2 1
N02 00
N ∞3 d




370 5
280 8
2 2
2 3
N 04 00
N o5 o0




27 o 6
330 5
2 4
2 5
N 06 0H 0N (7 Biblioteka o )徐邓言

39 0 2
王 光 伟
( 重庆 市 长 寿 区人 民 医院 , 重庆
[ 摘
4 12 ) 0 20
要] 金额数字 大写在 会计工作 中有广泛 的运 用, 如支票、 领款单的填写等。人 工转换 大写数字 , 时会 出现错 有
误, 本文探讨 了在 E cl xe 环境下利用带”[ b u 2 ” d nm ] 参数的 T X ( 函数进行金 额数字 大写的转换 方法 , ET ) 主要 用 于
20 0 9年 3月
中 国 管

相关主题