首页 > 单独文章 > 正文

Word2007能否实现有没有将数字转换为大写金额的功能

时间:2012-05-31 09:58:18 作者:officeba 【认证】

题目:
1、数字援引:在文章分歧处所呈现同一数字,我可否在更新此中一处后,其他位置的数字也同时更新?
2、有未将数字转换为大年夜写金额的功能。

解答:
1、Word可利用多种编制,实现点窜一个数据,其它位置的对该数据的援引进行更新。实现的编制首要有:经过过程选择性粘贴为链接的编制;经过过程设置源数据的书签,在其它援引位置利用REF域进行援引;利用主动图文集定义源数据,然后在其它位置插入一个对该主动图文集的AUTOTEXT域。利用DOCPROPERTY 域,经过过程文档属性定义一个源数据值,该值可以在文档属性中进行设置与点窜(如设置题目值为“10”,其它所有位置利用。利用DOCVARIABLE域,该域需要经过过程VBA指定值后才能获得。

2、这是《Word很是接触》一书中的主动填充人平易近币金额大年夜写的域代码,我把它贴出来,希冀对大年夜家有所帮忙、裨益。金额大年夜写中,对整数金额,可以直接经过过程【插入】/【数字】号令,在打开的【数字】对话框中拔取为“壹,贰,叁…”数字类型(设置数字格式)便可实现。对小数部分,道理也是设置数字格式,只是把角分数据提取出来后再设置其格式。
金额大年夜写转换的域代码:

{ SET Data { ={ Quote "A{ ={ SEQ Z }+1 }" } } }{ SET JinE { =ABS(Data) \#"0.00" } }{ SET Yuan { =INT(JinE) } }{ SET Jiao { =INT(JinE*10-Yuan*10) } }{ SET Fen { =INT(JinE*100-Yuan*100-Jiao*10) } }{ IF Data < 0 "负" "" }{ IF Yuan = JinE "{ =Yuan \*CHINESENUM2 }圆整" { IF Fen = 0 "{ =Yuan \*CHINESENUM2 }圆{ =Jiao \*CHINESENUM2 }角整" { IF Jiao = 0 "{ =Yuan \*CHINESENUM2 }圆{ =Fen \*CHINESENUM2 }分" "{ =Yuan \*CHINESENUM2 }圆{ =Jiao \*CHINESENUM2 }角{ =Fen \*CHINESENUM2 }分" }} }

申明:
①可以将该嵌套域代码保存于主动图文集中以便利调用。
②可在单位格中填充该域代码。
③具有正负数主动辨认功能。
④主动四舍五入。
⑤最大年夜金额绝对值为214 748 364 7。


相关文章

同类最新