利用Word宏把数字金额小写“变”大写
利用Word宏把数字金额小写“变”大写
在日常的办公应用中,尤其是作为一名财务人员,经常需要输入大写金额
的形式的数字,“肆仟叁佰五拾元零伍分”,如果用手工输入的话,显得比较麻
烦,其实只要通过输入小写数字并通过如下两招就能达到快速输入的目的。
启动Word后按下Alt+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 Selection
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 "数值超过范围!", _
v
bOKOnly + 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
Select 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 Select
'指定区域插入中文大写格式的域
Set MyField = .Fields.Add(Range:=.Range, Text:="= " & IntPart &
" \*CHINESENUM2")
MyField.Select '选定域(最后是用指定文本覆盖选定区域)
'如果仅有角分情况下,Mychinese为""
MyChinese = VBA.IIf(MyField.Result <> "零", MyField.Result, "")
.Text = Lable & MyChinese & Oddment
End With
End Sub
人民币金额大写:
输入完毕后按下Alt+Q键返回word中,以后只需要依次选中需要转换的小写金
额后,按下Alt+F8打开宏对话框,选择“小写金额变大写”宏,并单击“运行”
即可快速地得出大写金额。运行该宏可以在选定的文本数据后面插入此金额大
写,如果选定范围在表格中,则在右侧单元格中插入金额大写
Excel中如何利用公式将数字金额转化成大写
Excel中如何利用公式将数字金额转化成大写用Excel制作财务报表的时候,经常需要将数字表示为大写的中文数字金额。
一般情况下,我们可以用设置“单元格格式”的方法来实现自动转换大写金额,但是这种方法转换出来的大写金额存在两个方面的问题(见图一):1、当数字为整数时,比如B1单元格的数值为5560,将D1单元格设置格式为中文大写数字,输入公式“=B1”,其转换出来的大写为“伍仟伍佰陆拾”,实际工作中,D1单元格的值应该为“伍仟伍佰陆拾元整”,才能满足财务要求。
2、当数字带有小数时,比如B2单元格的数值为5824.56,将D2单元格设置格式为中文大写数字,输入公式“=B2”,其转换出来的大写为“叁仟捌佰贰拾肆点伍陆”,实际工作中,D2单元格的值应该为“叁仟捌佰贰拾肆元伍角陆分”,才能满足财务要求。
实际工作中,我们可以采取公式的方法来解决上述问题。
具体做法如下:在D1单元格输入公式:=IF(INT(B2)=0,"",TEXT(INT(B2),"[DBNum2]")&"元")&IF(INT(B2*100)=INT(B2)*100,"整",IF(OR(INT(B 2*10)=0,INT(B2)=B2),"",IF(INT(B2*10)=INT(B2)*10,"零",RIGHT (TEXT(INT(B2*10),"[DBNum2]"),1)&"角")&IF(INT(B2*100)=INT (B2*10)*10,"整",RIGHT(TEXT(ROUND(B2,2),"[DBNum2]"),1)&"分")))。
效果见图二。
Word中转换大小写的快捷键
Word中转换大小写的快捷键Ctrl+Shift+K组合键将所有字母设成小写Ctrl+Shift+A组合键将所有字母设为大写Ctrl+Shift+Spacebar创建不间断空格Ctrl+连字符创建不间断连字符Ctrl+B使字符变为粗体Ctrl+I使字符变为斜体Ctrl+U为字符添加下划线Ctrl+Shift+<缩小字号Ctrl+Shift+>增大字号Ctrl+Q删除段落格式Ctrl+Spacebar删除字符格式Ctrl+C复制所选文本或对象Ctrl+X剪切所选文本或对象Ctrl+V粘贴文本或对象Ctrl+Z撤消上一操作Ctrl+Y重复上一操作F1获得联机帮助或Office助手F2移动文字或图形F3插入自动图文集词条(在Word显示该词条之后)F4重复上一项操作F5选择“编辑”菜单中的“定位”命令F6前往下一个窗格或框架F7选择“工具”菜单中的“拼写和语法”命令F8扩展所选内容F9更新选定域F10激活菜单栏F11前往下一个域F12选择“文件”菜单中的“另存为”命令Shift+功能键Shift+F1组合键启动上下文相关帮助或显示格式Shift+F2组合键复制文本Shift+F3组合键改变字母大小写Shift+F4组合键重复“查找”或“定位”操作Shift+F5组合键移动到上一处修订Shift+F6组合键前往上一个窗格或框架Shift+F7组合键选择“同义词库”命令(位于“工具”菜单的“语言”子菜单中)Shift+F8组合键缩小所选内容Shift+F9组合键在域代码和其结果之间进行切换Shift+F10组合键显示快捷菜单Shift+F11组合键前往上一个域Shift+F12组合键选择“文件”菜单上的“保存”命令Ctrl+功能键Ctrl+F2组合键选择“文件”菜单上的“打印预览”命令Ctrl+F3组合键剪切至图文场Ctrl+F4组合键关闭窗口Ctrl+F5组合键还原文档窗口文档大小Ctrl+F6组合键前往下一个窗口Ctrl+F7组合键选择“控制”菜单上的“移动”命令Ctrl+F8组合键选择“控制”菜单上的“大小”命令Ctrl+F9组合键插入空域Ctrl+F10组合键将文档窗口最大化Ctrl+F11组合键锁定域Ctrl+F12组合键选择“文件”菜单上的“打开”命令Ctrl+Shift+功能键Ctrl+Shift+F3组合键插入图文场的内容Ctrl+Shift+F5组合键编辑书签Ctrl+Shift+F6组合键前往上一个窗口Ctrl+Shift+F7组合键更新Word源文档中链接的信息Ctrl+Shift+F8组合键扩展所选区域或块(然后按箭头键)Ctrl+Shift+F9组合键取消域的链接Ctrl+Shift+F10组合键激活标尺Ctrl+Shift+F11组合键取消对域的锁定Ctrl+Shift+F12组合键选择“文件”菜单上的“打印”命令Alt+功能键Alt+F1组合键前往下一个域Alt+F3组合键创建自动图文集词条Alt+F4组合键退出WordAlt+F5组合键还原程序窗口大小Alt+F7组合键查找下一处拼写或语法错误。
数值总和自动变汉字大写的方法
数值总和自动变汉字大写的方法需要接触财务做账的朋友或许会因为经常要在EXCEL改填大写数值而觉得麻烦吧。
有比较多时候,往往一个数值改变了,总数也改变、大写也改变,有得麻烦再改过,这样麻烦。
现在有一种方法,可以做到数值随便修改,而汉字大写的数值也会随之自动变更的,这样免了经常修改大写数值的麻烦。
好了,闲话不多说,现在我来说说这个具体办法吧例如下表中我们要计算从机关到生育的总人数,首先我们可以在一个空白的地方做总和,也就是输入这样的简单公式:“=SUM(A5:K5)”。
这个公式很简单,基本上绝大部分人都懂的。
然后把下面这个公式黏贴到工资总额那里:“=IF(ROUND(N5,2)<0,"无效数值",IF(ROUND(N5,2)=0,"零",IF(ROUND(N5,2)<1,"",TEXT(INT(ROUND(N5,2)),"[dbnum2]")&"元")&IF(INT(ROUND(N5,2)*10)-INT(ROUND(N5,2))*10=0,IF(INT(ROUND(N5 ,2))*(INT(ROUND(N5,2)*100)-INT(ROUND(N5,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(N5,2)*10)-INT(ROUND(N5,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(N5,2)*100)-INT(ROUND(N5,2)*10)*10)=0,"整",TEXT((INT(ROUND(N5,2)*100)-INT(ROUND(N5,2)*10)*10),"[dbnum2]") &"分")))”大家请留心注意一下这个公式是否都一直有一个:”N5”的值,这个N5的值就是上述中:“=SUM(A5:K5)”的位置来的,也就是这个值是可以改变的,例如我是在右手边空白的“F7”位置上合计那份表的数值总和的,那么用“F7”替代“N5”就可以了。
再谈如何将小写数字自动转换为人民币大写金额
再谈如何将小写数字自动转换为人民币大写金额
郭健虎
【期刊名称】《计算机应用文摘》
【年(卷),期】2003(000)004
【总页数】2页(P63-64)
【作者】郭健虎
【作者单位】无
【正文语种】中文
【中图分类】TP317.3
【相关文献】
1.在VFP中实现奖金核算功能之难点——报表中如何将人民币数额小写转换为大写 [J], 何建生;王建军
2.在VFP中实现奖金核算功能之难点——报表中如何将人民币数额小写转换为大写 [J], 何建生;王建军
3.Excel中人民币小写金额转换大写技巧三则 [J], 张丕南
4.运用ExcelVBA将人民币金额小写格式转换成大写格式 [J], 陈国栋
5.输入数字自动转换成人民币大写金额 [J], 李庆;郑轶
因版权原因,仅展示原文概要,查看原文内容请购买。
Word文档中使用宏的方法与实例
Word文档中使用宏的方法与实例Word是一款功能强大的文字处理软件,在日常工作和学习中得到广泛应用。
除了基本的排版和编辑功能外,Word还提供了一些高级的特性,如宏(Macro)。
宏可以自动执行一系列操作,帮助用户更快速地完成繁琐的工作。
本文将介绍在Word文档中使用宏的方法与实例,帮助读者更好地利用宏提高工作效率。
一、宏的定义与基本原理宏是一种由微软Office应用程序提供的自动化工具,用户可以使用Visual Basic for Applications(VBA)编程语言来创建和编辑宏。
宏实质上是一段自定义的代码,用于自动化执行一系列预先设置好的操作。
比如,在Word中使用宏可以一键实现格式调整、批量替换、文档套用模板等功能。
二、创建宏的方法在Word文档中创建宏有两个主要的方法:使用录制宏功能和通过VBA编辑器手动编写宏代码。
1. 使用录制宏功能在Word菜单栏中选择“开发工具”->“宏”,点击“录制新宏”,输入宏的名称和可选的快捷键,点击“确定”即可开始录制。
在录制过程中,所有的鼠标移动、键盘输入和文字格式调整等操作都将被记录下来。
完成后,点击“停止录制”即可保存宏。
2. 通过VBA编辑器手动编写宏代码在Word菜单栏中选择“开发工具”->“宏”,点击“宏安全性”,勾选“开发人员”选项,点击“确定”保存设置。
然后选择“开发工具”->“Visual Basic”打开VBA编辑器。
在编辑器中,可以写入VBA代码,实现自定义的操作逻辑。
编写完成后,保存并关闭VBA编辑器即可。
三、宏的实例应用下面,我们通过几个实例来演示宏在Word文档中的实际应用。
1. 自动保存文档如果您常常忘记保存Word文档,可以利用宏自动保存。
创建一个宏,编写代码如下:Sub AutoSave()ActiveDocument.SaveEnd Sub然后将此宏添加到快捷工具栏或密切相关的位置。
以后在编辑文档时,只需点击此宏按钮即可实现自动保存。
(完整版)Word中转换大小写的快捷键
Word中转换大小写的快捷键Ctrl+Shift+K 组合键将所有字母设成小写Ctrl+Shift+A 组合键将所有字母设为大写Ctrl+Shift+Spacebar 创建不间断空格Ctrl+连字符创建不间断连字符Ctrl+B 使字符变为粗体Ctrl+I 使字符变为斜体Ctrl+U 为字符添加下划线Ctrl+Shift+< 缩小字号Ctrl+Shift+> 增大字号Ctrl+Q 删除段落格式Ctrl+Spacebar 删除字符格式Ctrl+C 复制所选文本或对象Ctrl+X 剪切所选文本或对象Ctrl+V 粘贴文本或对象Ctrl+Z 撤消上一操作Ctrl+Y 重复上一操作F1 获得联机帮助或Office 助手F2 移动文字或图形F3 插入自动图文集词条(在Word 显示该词条之后)F4 重复上一项操作F5 选择“编辑”菜单中的“定位”命令F6 前往下一个窗格或框架F7 选择“工具”菜单中的“拼写和语法”命令F8 扩展所选内容F9 更新选定域F10 激活菜单栏F11 前往下一个域F12 选择“文件”菜单中的“另存为”命令Shift+功能键Shift+F1 组合键启动上下文相关帮助或显示格式Shift+F2 组合键复制文本Shift+F3 组合键改变字母大小写Shift+F4 组合键重复“查找”或“定位”操作Shift+F5 组合键移动到上一处修订Shift+F6 组合键前往上一个窗格或框架Shift+F7 组合键选择“同义词库”命令(位于“工具”菜单的“语言”子菜单中)Shift+F8 组合键缩小所选内容Shift+F9 组合键在域代码和其结果之间进行切换Shift+F10 组合键显示快捷菜单Shift+F11 组合键前往上一个域Shift+F12 组合键选择“文件”菜单上的“保存”命令Ctrl+功能键Ctrl+F2 组合键选择“文件”菜单上的“打印预览”命令Ctrl+F3 组合键剪切至图文场Ctrl+F4 组合键关闭窗口Ctrl+F5 组合键还原文档窗口文档大小Ctrl+F6 组合键前往下一个窗口Ctrl+F7 组合键选择“控制”菜单上的“移动”命令Ctrl+F8 组合键选择“控制”菜单上的“大小”命令Ctrl+F9 组合键插入空域Ctrl+F10 组合键将文档窗口最大化Ctrl+F11 组合键锁定域Ctrl+F12 组合键选择“文件”菜单上的“打开”命令Ctrl+Shift+功能键Ctrl+Shift+F3 组合键插入图文场的内容Ctrl+Shift+F5 组合键编辑书签Ctrl+Shift+F6 组合键前往上一个窗口Ctrl+Shift+F7 组合键更新Word 源文档中链接的信息Ctrl+Shift+F8 组合键扩展所选区域或块(然后按箭头键)Ctrl+Shift+F9 组合键取消域的链接Ctrl+Shift+F10 组合键激活标尺Ctrl+Shift+F11 组合键取消对域的锁定Ctrl+Shift+F12 组合键选择“文件”菜单上的“打印”命令Alt+功能键Alt+F1 组合键前往下一个域Alt+F3 组合键创建自动图文集词条Alt+F4 组合键退出WordAlt+F5 组合键还原程序窗口大小Alt+F7 组合键查找下一处拼写或语法错误。
数字大写大写的一到十大写人民币大写大写数字金额阿拉伯数字大写
万柒仟元零伍角叁分,或者写成人民币壹拾万零柒仟元伍角叁分。
4、阿拉伯金额数字角位是"0",而分位不是"0"时,中文大写金额"元"后面应写"零"字。
如¥16409.02,应写成人民币壹万陆仟肆佰零玖元零贰分;又如¥3 25.04,应写成人民币叁佰贰拾伍元零肆分。
数字大写转换工具为您提供大写的一到十,大写,人民币大写,大写数字金额,阿拉伯数字大写,金额大写,大小写转换,数字大写怎么写,1到10的大写,金额大写转换等。
教你如何用WORD文档(2012-06-27 192246)转载▼标签:杂谈1. 问:WORD 里边怎样设置每页不同的页眉?如何使不同的章节显示的页眉不同?答:分节,每节可以设置不同的页眉。
文件――页面设置――版式――页眉和页脚――首页不同。
2. 问:请问word 中怎样让每一章用不同的页眉?怎么我现在只能用一个页眉,一改就全部改了?答:在插入分隔符里,选插入分节符,可以选连续的那个,然后下一页改页眉前,按一下“同前”钮,再做的改动就不影响前面的了。
简言之,分节符使得它们独立了。
这个工具栏上的“同前”按钮就显示在工具栏上,不过是图标的形式,把光标移到上面就显示出”同前“两个字来。
3. 问:如何合并两个WORD 文档,不同的页眉需要先写两个文件,然后合并,如何做?答:页眉设置中,选择奇偶页不同与前不同等选项。
4. 问:WORD 编辑页眉设置,如何实现奇偶页不同比如:单页浙江大学学位论文,这一个容易设;双页:(每章标题),这一个有什么技巧啊?答:插入节分隔符,与前节设置相同去掉,再设置奇偶页不同。
5. 问:怎样使WORD 文档只有第一页没有页眉,页脚?答:页面设置-页眉和页脚,选首页不同,然后选中首页页眉中的小箭头,格式-边框和底纹,选择无,这个只要在“视图”――“页眉页脚”,其中的页面设置里,不要整个文档,就可以看到一个“同前”的标志,不选,前后的设置情况就不同了。
excel中小写金额转大写金额的公式
excel中小写金额转大写金额的公式
在Excel中,我们可以使用以下公式将小写金额转换为大写金额: =IF(A1<0,'负','')&TEXT(INT(A1),'[$中文大写数字]元整
')+IF(A1-INT(A1)=0,'','')+IF(ROUND(MOD(A1,1),2)*100<10,'零','')&TEXT(ROUND(MOD(A1,1),2)*100,'[$中文大写数字]角
')+IF(ROUND(MOD(A1,1),2)*100=0,'','')+IF(ROUND(MOD(A1,0.01)
,2)*100<10,'零','')&TEXT(ROUND(MOD(A1,0.01),2)*100,'[$中文
大写数字]分')
其中,A1为需要转换的小写金额。
公式中的“[$中文大写数字]”表示使用Excel内置的中文大写数字格式。
如果需要转换成其他语言的大写金额,可以替换成相应的格式。
需要注意的是,该公式只适用于转换人民币金额,其他货币的转换需要使用相应的格式和汇率进行计算。
- 1 -。
Word中如何设置文字的字母大小写
Word中如何设置文字的字母大小写微软Word是一款常用的文字处理软件,许多人在日常生活和工作中都会使用它。
在处理文字时,有时我们需要调整字母的大小写,这可以让文档的格式更加符合要求。
下面将介绍在Word中如何设置文字的字母大小写。
一、首字母大写有时候,在书写标题、人名或专有名词时,需要将单词的首字母大写。
以下是在Word中进行首字母大写设置的方法:1.选中要设置的文本。
2.点击Word菜单栏上的"开始"选项。
3.在"字体"部分右侧,找到"更改大小写"按钮,点击打开下拉菜单。
4.在下拉菜单中选择"首字母大写"。
通过以上步骤,我们可以轻松地将所选文本的每个单词的首字母都设置为大写。
二、全部大写有时候,在特定场景下需要将文本的所有字母都设置为大写,比如某些公告或标语。
下面是在Word中设置全部大写的方法:1.选中要设置的文本。
2.点击Word菜单栏上的"开始"选项。
3.在"字体"部分右侧,找到"更改大小写"按钮,点击打开下拉菜单。
4.在下拉菜单中选择"大写"。
通过以上步骤,我们可以将所选文本的所有字母全部转换为大写。
三、全部小写与全部大写相反,有时候我们需要将文本的所有字母都设置为小写,比如在书写正文时。
以下是在Word中设置全部小写的方法:1.选中要设置的文本。
2.点击Word菜单栏上的"开始"选项。
3.在"字体"部分右侧,找到"更改大小写"按钮,点击打开下拉菜单。
4.在下拉菜单中选择"小写"。
通过以上步骤,我们可以将所选文本的所有字母全部转换为小写。
四、大小写切换有时候,我们在书写文本时可能需要对已有的部分文本进行大小写的切换,比如将全大写转换为全小写,或将全小写转换为全大写。
Word宏命令简介教程
Word宏命令简介教程第一章:什么是Word宏命令Word宏命令是一种编程技术,能够自动化执行复杂的任务。
它可以将一系列的操作步骤记录下来,以便将来重复使用。
通过使用Word宏命令,用户可以提高其工作效率,简化繁琐的操作流程。
第二章:如何录制Word宏命令录制Word宏命令是使用Word宏命令的最简单方法之一。
用户只需按照以下步骤进行操作:1. 在Word中打开“开发工具”选项卡;2. 点击“录制宏”按钮,弹出“录制宏”对话框;3. 在“宏名称”框中输入宏的名称,并选择宏存储的位置;4. 点击“确定”,开始录制宏;5. 执行一系列操作步骤,Word会记录下你的操作;6. 点击“停止录制”按钮结束录制。
第三章:编辑和运行Word宏命令录制完宏命令后,你可以对其进行编辑和运行。
编辑宏命令可以在宏中添加、修改和删除操作步骤,以满足特定的需求。
运行宏命令可以通过以下步骤进行操作:1. 在Word中打开“开发工具”选项卡;2. 点击“宏”按钮,弹出“宏”对话框;3. 在对话框中选择你要运行的宏;4. 点击“运行”按钮,运行宏命令。
第四章:Word宏命令的应用Word宏命令广泛应用于各种办公场景中,如自动化生成报告、批量处理数据、自定义快捷键等。
下面是几个常见的应用示例:1. 批量快速替换文字:通过编写宏命令,可以一次性替换文档中的多个关键词,节省大量的时间和精力;2. 自动化生成表格:宏命令可以根据特定的规则自动插入表格、合并单元格、设置格式等,使表格的生成变得更加高效;3. 自定义快捷键:用户可以通过宏命令将某个常用操作绑定到一个快捷键上,方便快速执行操作。
第五章:常见问题及解决方案在使用Word宏命令的过程中,可能会遇到一些常见问题。
以下是一些常见问题及其解决方案:1. 宏录制过程中出错:检查你的操作是否符合宏命令录制的规范,如是否有未关闭的对话框、是否选择了正确的操作对象等;2. 宏运行后无反应:检查宏是否启用,可以在安全中心的宏设置中进行开启;3. 宏命令执行不符合预期:检查宏命令中的操作步骤是否正确,如是否选中了正确的文本、是否选择了正确的格式等。
