Word中数字金额小写
给Word添加数字大小写转换命令
给Word添加数字大小写转换命令Next i 当用 Wo rd 输入表示金额的数字时 , 除了输入阿拉伯数字(() )k = Val Mid c , l - 1 , 1 外 ,常常需要输入数字的中文大写形式 ,而输入中文大写数字显 ( ) chine se = chine se + Midstr1 , k + 1 , 1+ “角” 然比输入阿拉伯数字要慢得多 ,若能提供一个直接将阿拉伯数字(() )k = Val Mid c , l , 1 自动转换中文大写数字的命令 ,可以大大提高输入速度。
笔者编( ) chine se = chine se + Midstr1 , k + 1 , 1+ “分” 写了一个 Change To Cn 宏命令可以实现这一功能 ,本文详细介绍 detail = chine se Selectio n. Inse rtAfte r chine se Wo rd97/ 2000 中创建该宏命令。
如何在 End If 一、创建一个对话窗口 frmchangeto cn. hide 单击“工具”3“宏”3“Vi sual Ba sic 编辑器”,启动 Vi sual Ba2 End Sub sic 编辑器。
单击其菜单栏上的命令“插入”3“添加用户窗体”, ( ) 单击“取消”命令按钮 Co mmandButto n2 , btnCanc el,为其添加一 () 添加一个空白用户窗体 ,在窗体上添加两个标签 La bel、两个文段命令处理程序如下 : ( ) ( ) 本编辑Te xtBo x和两个命令按钮 Co mmandButto n控件 ,按下表()Privat e Sub btnc anc el- Click 修改它们的属性。
frmchangeto cn. hide 组件属性值 End Sub() 最后给窗体的激活事件 Use rFo rm- Activat e添加如下程序段 : )( 命名 frmChange To Cn userfo rm 将阿拉伯数字转换为中文大写数字 ()Privat e Sub Use rFo rm- activat e Captio n)( 命名 Lo a d frmchangeto cn la bel La bel 输入阿拉伯数字 : End Sub Captio n 二、创建调用该对话窗口的宏命令 ( )命名 Te xtBo x txt alb 单击Vi sual Ba sic 编辑器菜单栏上的“插入”3“添加模块”命 )( 命名 btnO K令 ,在代码编辑窗口输入如下程序段 : Co mmandButto n1 确定 Captio n ()Sub changeto cn )( 命名 btnCancel Co mmandButto n2 frmchangeto cn. Show 取消Captio n End Sub ( ) 然后单击“确定”命令按钮 Co mmandButto n1 ,btnO K,为其添完成上述步骤后 ,保存整个工作 ,切换回 Wo rd ,就可以使用该宏加一段命令处理程序如下 : 命令了。
大小写金额书写规范
大小写金额书写规范第一篇：大小写金额书写规范银行、单位和个人填写的各种票据和结算凭证是办理支付结算和现金收付的重要依据，直接关系到支付结算的准确、及时和安全。
票据和结算凭证是银行、单位和个人凭以记载账务的会计凭证，是记载经济业务和明确经济责任的一种书面证明。
因此，填写票据和结算凭证必须做到标准化、规范化、要素齐全、数字正确、字迹清晰、不错漏、不潦草、防止涂改。
中文大写金额数字应用正楷或行书填写，如壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零、整(正)等字样，不得用一、二(两)、三、四、五、六、七、八、九、十、毛、另(或0)填写，不得自造简化字。
如果金额数字书写中使用繁体字，也应受理。
人民币大写的正确写法还应注意以下几项：一、中文大写金额数字到“元”为止的，在“元”之后、应写“整”(或“正”)字；在“角”之后，可以不写“整”(或“正”)字；大写金额数字有“分”的，“分”后面不写“整”(或“正”)字。
二、在票据和结算凭证大写金额栏内不得预印固定的“仟、佰、拾、万、仟、佰、拾、元、角、分”字样。
三、阿拉伯数字小写金额数字中有“0”时，中文大写应按照汉语语言规律、金额数字构成和防止涂改的要求进行书写。
举例如下：1、阿拉伯数字中间有“0”时，中文大写要写“零”字，如￥1409.50应写成人民币壹仟肆佰零玖元伍角；2、阿拉伯数字中间连续有几个“0”时、中文大写金额中间可以只写一个“零”字，如￥6007.14应写成人民币陆仟零柒元壹角肆分。
3、阿拉伯金额数字万位和元位是“0”，或者数字中间连续有几个“0”，万位、元位也是“0”但千位、角位不是“0”时，中文大写金额中可以只写一个零字，也可以不写“零”字，如￥1680.32应写成人民币壹仟陆佰捌拾元零叁角贰分，或者写成人民币壹仟陆佰捌拾元叁角贰分。
又如￥107000.53应写成人民币壹拾万柒仟元零伍角叁分，或者写成人民币壹拾万零柒仟元伍角叁分。
合同金额大小写格式
合同金额大小写格式合同金额大小写格式篇一：大小写金额书写规范银行、单位和个人填写的各种票据和结算凭证是办理支付结算和现金收付的重要依据，直接关系到支付结算的准确、及时和安全。
票据和结算凭证是银行、单位和个人凭以记载账务的会计凭证，是记载经济业务和明确经济责任的一种书面证明。
因此，填写票据和结算凭证必须做到标准化、规范化、要素齐全、数字正确、字迹清晰、不错漏、不潦草、防止涂改。
中文大写金额数字应用正楷或行书填写，如壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零、整(正)等字样，不得用一、二(两)、三、四、五、六、七、八、九、十、毛、另(或0)填写，不得自造简化字。
如果金额数字书写中使用繁体字，也应受理。
人民币大写的正确写法还应注意以下几项：一、中文大写金额数字到“元”为止的，在“元”之后、应写“整”(或“正”)字；在“角”之后，可以不写“整”(或“正”)字；大写金额数字有“分”的，“分”后面不写“整”(或“正”)字。
二、在票据和结算凭证大写金额栏内不得预印固定的“仟、佰、拾、万、仟、佰、拾、元、角、分”字样。
三、阿拉伯数字小写金额数字中有“0”时，中文大写应按照汉语语言规律、金额数字构成和防止涂改的要求进行书写。
举例如下：1、阿拉伯数字中间有“0”时，中文大写要写“零”字，如￥应写成人民币壹仟肆佰零玖元伍角；2、阿拉伯数字中间连续有几个“0”时、中文大写金额中间可以只写一个“零”字，如￥应写成人民币陆仟零柒元壹角肆分。
3、阿拉伯金额数字万位和元位是“0”，或者数字中间连续有几个“0”，万位、元位也是“0”但千位、角位不是“0”时，中文大写金额中可以只写一个零字，也可以不写“零”字，如￥应写成人民币壹仟陆佰捌拾元零叁角贰分，或者写成人民币壹仟陆佰捌拾元叁角贰分。
又如￥应写成人民币壹拾万柒仟元零伍角叁分，或者写成人民币壹拾万零柒仟元伍角叁分。
4、阿拉伯金额数字角位是“0”而分位不是“0”时，中文大写金额“元”后面应写“零”字，如￥应写成人民币壹万陆仟肆佰零玖元零贰分，又如￥应写成人民币叁佰贰拾伍元零肆分。
数字金额小写大写转换
数字金额小写大写转换（excel）(wotd)
1、运用输入法来实现，如极点中文（QQ五笔）输入平台，在极点
五笔（QQ五笔）中，输入“;阿拉伯数字;”（注意分号是半角英文分号)，
后面是所要的金额数字，如输入;123.45即得壹佰贰拾叁圆肆角伍分。
注意不要关闭输入法，一定在输入汉字状态下。
这个是我用过所有的当
中最好用也是最方便的一个，而且还有一个好处就是word和Excel通
用。
如用搜狗拼音输入法（v模式）：v123.45即得壹佰贰拾叁圆肆角
伍分。
示例：
日期转换按；(分号)后输入数字;2005.8.26 输出二〇〇五年八月二十金额转换按；(分号)后输入数字;2088.82 输出贰仟零捌拾捌元捌角
假设你要造一个能输入当前日期及时间的词组，编码是now，那么你可以根据自己的格式要求使用上面的变量来造出此词组。
比如，我们造了一个"$y年$m年$d日$20$h时$mi分$0s秒"的词组，当你输入编码：空格now后在输入
2008.6.24.20.45.06，输出的内容会是类似下面这样的：
2008年6月24日 20时45分06秒（只有在极点五笔中才有此功能）
2.EXCEL中，选中数字金额的单元格，打开“设置单元格格式”对
话框，“数字”分类下“特殊”，有中文大写，小写数字，不过此方法
只是把阿拉伯数字原样改成大写金额而已，比较生搬硬套。
以上的公式
就是根据此选项定义变通改编而来。
word文档英语大小写转换
一、让不同类型数据用不同颜色显示在工资表中，如果想让大于等于2000元的工资总额以“红色”显示，大于等于1500元的工资总额以“蓝色”显示，低于1000元的工资总额以“棕色”显示，其它以“黑色”显示，我们可以这样设置。
1.打开“工资表”工作簿，选中“工资总额”所在列，执行“格式→条件格式”命令，打开“条件格式”对话框。
单击第二个方框右侧的下拉按钮，选中“大于或等于”选项，在后面的方框中输入数值“2000”。
单击“格式”按钮，打开“单元格格式”对话框，将“字体”的“颜色”设置为“红色”。
2.按“添加”按钮，并仿照上面的操作设置好其它条件(大于等于1500，字体设置为“蓝色”；小于1000，字体设置为“棕色”)。
3.设置完成后，按下“确定”按钮。
看看工资表吧，工资总额的数据是不是按你的要求以不同颜色显示出来了。
附送一条小编知道的Word中转换大小写的快捷键：Shift+F3。
选中字母先，按一次，小写变大写；再按一次，大写变小写。
如果选中的是大小写混排的字母，则转换效果依次为：首字母大写->全部大写->全部小写。
推而广之，在这个案例中，我们可以把Excel中需要转换的内容整个复制到Word中（Excel单元格在Word中会自动转换成表格），再用Shift+F3转换，最后复制回Excel。
它们分别是：“=UPPER(源数据格)”，将文本全部转换为大写；“=LOWER(源数据格)”，将文本全部转换成小写；“=PROPER(源数据格)”，将文本转换成“适当”的大小写，如让每个单词的首字母为大写等。
例如，我们在一张表格的A1单元格中输入小写的“excel”，然后在目标单元格中输入“=UPPER(A1)”，回车后得到的结果将会是“EXCEL”。
同样，如果我们在A3单元格中输入“mr.weiwei”，然后我们在目标单元格中输入“=PROPER(A3)”，那么我们得到的结果就将是“Mr.Weiwei”了。
一秒将合同金额变成大写你学会了吗
一秒将合同金额变成大写你学会了吗
今天零壹学长给大家介绍的这种方法就可以帮助你快速又准确地将阿
拉伯数字金额转换成大写金额~
01
选中合同中的金额数据
02
点击【插入】-【符号】中的“编号”按钮，在弹出的“编号”对话
框中编号类型选择“壹、贰、叁……”，点击确定，即可将小写的金额转
换成大写金额
03
若金额有小数点的，要分两次转换，小数点前转换一次，小数点后又
转换一次
04
注意此方法转换的金额在0~999999之间，若选中的数值超过999999
则无法转化，同样要分批转换。
05
这个小技巧既能快速转换小写金额为大写金额，还能准确转换，同样，可以用这个方法将大写金额转换为小写金额。
52万5千600元小写
52万5千600元小写
摘要：
1.了解文本内容
2.转换为小写形式
3.突出可读性和实用性
正文：
在日常生活中，我们经常会遇到大额金额的表述，而将这些金额转化为小写形式是一项基本的财务技能。
今天，我们就来学习如何将金额如52万5千600元转换为小写形式。
首先，我们需要了解文本内容。
给出的金额是52万5千600元，我们需要将其转换为小写形式。
接下来，我们来进行转换。
52万5千600元的小写形式为：525,600。
最后，为了突出可读性和实用性，我们可以将这个数字进行适当的格式化。
例如，我们可以将其写作525,600元整，这样既方便阅读，又方便理解。
综上，52万5千600元的小写形式为525,600元整。
掌握这个技巧，你在处理大额金额时会更加得心应手，无论是日常记账还是商务往来，都能体现出你的专业素养。
大小写金额书写规范
阿拉伯数字的书写阿拉伯数字有0、1、2、3、4、5、6、7、8、9，是世界各国通用的数字。
1.书写与数位相结合数位即数字所在位置所表示的单位。
数位按照个、十、百、千、万、的顺序是由小到大、从左向右的。
数万千百十万千百十万千百十个十百千万十百位万万万万万万万万位位位位位分分分分万万万万万万位位位位位位位位分分位位位位位位读兆千百十亿千百十万千百十个分厘毫兰忽微法亿亿亿万万万2.采用三位分节制使用分节号能够较容易地辨认数的位数，有利于数字的书写、阅读和计算工作。
数的整数部分，采用国际通用的“三位分节制”，从个位向左每三位数用分节号“，”分开。
例如：千百十万万千百十个带小数的数字，应将小数点记在个位与十分万万位位位位位位位之间的下方。
位位十百千百十个分分9 2 ，0 7 0 ，0 0 0位位位位位位6，0 7 8. 9 5一般账表凭证的金额栏印有分位格，元位前每三位印有一组线代表分为节，元位与角位之间的粗红线则代表小数点，计数时不要再另加分节号或小数点。
3.关于人民币符号“￥”的使用在填制凭证时，小写金额前一般均冠以人民币符号“￥”。
“￥”是拼音“YUAN ”(元)的缩写，“￥”既代表了人民币币制，又表示了人民币“元”的单位。
所以小写金额前填写“￥”以后，数字之后就不必再写“元”了。
例如：￥3 214.03，即为人民币叁仟贰佰壹拾肆元零叁分。
书写时在“￥”与数字之间不能留有空位，以防止金额数字被人涂改。
阿拉伯小写金额数字前面均应填写人民币符号“￥”，阿拉伯小写金额数字要认真填写，不得连写分辨不清。
在登记账簿，编制报表时不能使用“￥”符号，因为账簿、报表上不存在金额数字被涂改而造成损失的情况。
在账页或报表上如果使用“￥”反而会增加错误的可能性。
4.关于金额角、分的写法在无金额分位格的凭证上，所有以元为单位的阿拉伯数字除表示单价等情况外，一律写到角分，无角分的，角位和分位可写成“00”，或符号“－”，有角无分的，分为应写成“0”，不能用符号“－”代替。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Word中数字金额小写“变”大写有两招
在日常的办公应用中，尤其是作为一名财务人员，经常需要输入大写金额的形式的数字，“肆仟叁佰五拾元零伍分”，如果用手工输入的话，显得比较麻烦，其实只要通过输入小写数字并通过如下两招就能达到快速输入的目的。
第一招：釜底抽薪——自动更正法
如果需要重复的输入一个大写数字金额，可以采用自动更正的方法。
例如要重复输入“肆仟叁佰伍拾元零伍分”，可以先输入“肆仟叁佰伍拾元零伍分”并选中它，然后执行菜单“工具→自动更正选项”打开“自动更正”对话框（图1），在“替换”下的框内输入“4350.05”并单击“添加”按钮确定后退出，以后直接输入“4350.05”后回车即可快速得到“肆仟叁佰伍拾元零伍分”。
第二招：一劳永逸——编制自动宏
如果有许多小写金额要变成大写的话，用上面的自动更正的方法需要定义很多自动更正项，显然也比较麻烦，其实只需要编辑一个宏就能做到“一劳永逸”了。
启动Word后按下A
lt+F11组合键，在打开的工程窗口左侧双击“ThisDocument”进入代码编写窗口，在代码编辑窗口中输入如下代码：
Option Explicit
Sub 小写金额变大写()
Dim Numeric As Currency, IntPart As Long, DecimalPart As Byte, MyField As Field, Lable As String
Dim Jiao As Byte, Fen As Byte, Oddment As String, Odd As String, MyChinese As String
Const ZWDX As String = "壹贰叁肆伍陆柒捌玖零" ''定义一个中文大写汉字常量 On Error Resume Next ''错误忽略
With ｓｅｌｅｃｔion
Numeric = VBA.Round(VBA.Val(.Text), 2) ''四舍五入保留小数点后两位
''判断是否在表格中
If .Information(wdWithInTable) Then _
.MoveRight unit:=wdCell Else .MoveRight unit:=wdCharacter
''对数据进行判断,是否在指定的范围内
If VBA.Abs(Numeric) > 2147483647 Then MsgBox "数值超过范围!", _
vbOKOnly + vbExclamation, "Warning": Exit Sub
IntPart = Int(VBA.Abs(Numeric)) ''定义一个正整数
Odd = VBA.IIf(IntPart = 0, "", "圆") ''定义一个STRING变量
''插入中文大写前的标签
Lable = VBA.IIf(Numeric = VBA.Abs(Numeric), "人民币金额大写:", "人民币金额大写:负")
''对小数点后面二位数进行择定
DecimalPart = (VBA.Abs(Numeric) - IntPart) * 100
ｓｅｌｅｃｔCase DecimalPart
Case Is = 0 ''如果是0,即是选定的数据为整数
Oddment = VBA.IIf(Odd = "", "", Odd & "整")
Case Is < 10 ''<10,即是零头是分
Oddment = VBA.IIf(Odd <> "", "圆零" & VBA.Mid(ZWDX, DecimalPart, 1) & "分", _
VBA.Mid(ZWDX, DecimalPart, 1) & "分")
Case 10, 20, 30, 40, 50, 60, 70, 80, 90 ''如果是角整
Oddment = "圆" & VBA.Mid(ZWDX, DecimalPart / 10, 1) & "角整"
Case Else ''既有角,又有分的情况
Jiao = VBA.Left(CStr(DecimalPart), 1) ''取得角面值
Fen = VBA.Right(CStr(DecimalPart), 1) ''取得分面值
Oddment = Odd & VBA.Mid(ZWDX, Jiao, 1) & "角" ''转换为角的中文大写
Oddment = Oddment & VBA.Mid(ZWDX, Fen, 1) & "分" ''转换为分的中文大写
End ｓｅｌｅｃｔ
''指定区域插入中文大写格式的域
Set MyField = .Fields.Add(Range:=.Range, Text:="= " & IntPart & "
\*CHINESENUM2")
MyField.ｓｅｌｅｃｔ''选定域(最后是用指定文本覆盖选定区域)
''如果仅有角分情况下,Mychinese为""
MyChinese = VBA.IIf(MyField.Result <> "零", MyField.Result, "")
.Text = Lable & MyChinese & Oddment
End With
End Sub
输入完毕后按下Alt+Q键返回word中，以后只需要依次选中需要转换的小写金额后，按下Alt+F8打开宏对话框，选择“小写金额变大写”宏（图2），并单击“运行”即可快速地得出大写金额。
运行该宏可以在选定的文本数据后面插入此金额大写，如果选定范围在表格中，则在右侧单元格中插入金额大写。