怎样将word文档中数字，自动加“千分符”？
1、打开WORD程序，在上方菜单区域中，右键单击，选中Visual Basic。点击“Visual Basic编辑器”图标，打开Visual Basic，在“ThisDocument ”中双击，然后在右边的窗口中复制下方的代码：
2、对所有的数字加千分位，并且自动加上尾数.00
'本代码旨在解决WORD中数据转化为千分位
'数据限定要求:-922,337,203,685,477.5808 到 922,337,203,685,477.5807
'转化结果1000以上数据以千分位计算,小数点右侧保留二位小数;1000以下数据不变
Sub yycealjj1()
Dim myRange As Range, i As Byte, myValue As Currency
On Error Resume Next
Application.ScreenUpdating = False '关闭屏幕更新
NextFind: Set myRange = ActiveDocument.Content '定义为主文档文字部分
With myRange.Find '查找
.ClearFormatting '清除格式
.Text = "[0-9]{4,15}" '4到15位数据
.MatchWildcards = True '使用通配符
Do While .Execute '每次查找成功
i = 2 '起始值为2
'如果是有小数点
If myRange.Next(wdCharacter, 1) = "." Then
'进行一个未知循环
While myRange.Next(wdCharacter, i) Like "#"
i = i + 1 '只要是[0-9]任意数字则累加
Wend
'重新定义RANGE对象
myRange.SetRange myRange.Start, myRange.End + i - 1
End If
myValue = VBA.Val(myRange) '保险起见转换为数据,也可省略
myRange = VBA.Format(myValue, "Standard") '转为千分位格式
GoTo NextFind '转到指定行
Loop
End With
Application.ScreenUpdating = True '恢复屏幕更新
End Sub
3、关闭Visual Basic编辑器，回到WORD界面。输入文章后，点击“运行宏”图标，运行yycealjj1宏，即可对数字加千分位。（可以插入模板，以后要用时加载即可）
自动怎么加我不清楚，不过在智能ABC的输入法的状态下打字母V然后按数字键1，然后会出现一系列符号，然后继续按主键盘上的=/+号键，连续按8下，你会发现第3个符号就是千分比符号：‰
没有自动加的功能，不过也很好设的：你点 插入－符号－ 找到“‰”后，在下面有自动更正和快捷键的设置，你设一种就好了。
把楼上的千分符粘贴进去，在工具--自动更正中增加一条，将“%%”自动更正为“‰”。
以后需要打‰时，你只要连续输入两个%就可以了。
那需要通过代码的方式进行，很费事了。
word文档中的表格里的数字怎样自动求和 - …… 1. 选中数据,右键鼠标,设置单元格格式,将数据变成常规或者数值,然后确定.、2.在菜单里,选择公式——自动求和-求和,在选中数据的下一行就会出现求和结果.
如何快速把word里的数字删掉 - …… 举例说明: 1.Word文本正文中数字和文本掺杂,需要将其中的所有数字去掉. 2.按键盘上的Ctrl+H调出替换对话框,上面的框输入[0-9]. 3.点击替换框左下角【更多】按钮. 4.如下图,选择【使用通配符】. 5.点击【全部替换】按钮. 6.关闭对话框,再次查看word文档,文本中就不包括数字了
word中自动编写数字序号的功能是怎么弄出来得 - …… 1 在你的文档第一节处选择右键,项目编号,然后选择编号模式.展开全部2 设置好后,第二节直接回车编号就出来了.
怎样将word文档中数字,自动加“千分符”? - …… 1、打开WORD程序,在上方菜单区域中,右键单击,选中Visual Basic.点击“Visual Basic编辑器”图标,打开Visual Basic,在“ThisDocument ”中双击,然后在右边的窗口中复制下方的代码: 2、对所有的数字加千分位,并且自动加上尾...
如何快速删除word文档中的数字 - …… 1、在word中,用快捷键“ctrl+F”,打开“查找和替换”对话框; 2、”查找内容“输入“^#”,代表任意数字,“替换为”内容为空白; 3、点击“替换”或者“全部替换”,文档中的数字就随着操作消失了.
怎样把word里面的数字统一改成中文数字? - …… 在Word文档中编辑文本内容时我们通常都会为其设置一定的字体字号等效果,比如我们可以为中文设置宋体、小四的效果,为英文字母设置times new Roman字体等等.如果我们需要将文档中所有的数字改为统一的字体和大小,小伙伴们知道...
Word里怎么在框框里面填数字? - …… 1、打开Word文档,在页面中录入一组数字,下图中末尾三个位置为三个方框. 2、首先将三个方框直接替换为需要输入的数字.例如“567”. 3、选择数字“5”,点击工具栏“字体”中的“带圈字符”. 4、在弹出的设置对话框中,选择“增大圈号”,并将圈号选成方框,点击确定. 5、即可将选中的数字“5”变成带框数字了. 6、用同样的方法将数字“6”和“7”都更改为带框数字即可完成设置.
如何word文档将文本中所有数字的加着重号 - …… 操作方式1)快捷方式:Ctrl+D --弹出对话框中的字体里的所有文字---着重号·2)在WORD中的“菜单栏”--格式--字体--所有文字---着重号·
怎么选中WORD文档里的所有数字啊? - …… 1、第一步,打开word2016,新建一个文本文档并输入一段穿插数字的文字段,如下图所示. 2、第二步,按下键盘“ctrl + f”打开查找导航栏,如下图所示. 3、第三步,打开查找栏之后,在输入框中输入“^#”命令,并点击回车键,如下图所示. 4、第四步,完成上述操作之后会发现当前文本中的所有数字都被选中了,如下图所示.
怎样在word文档中输入手写体阿拉伯数字 - …… 在word文档中输入阿拉伯数字,可以通过键盘直接输入. 1、可以按NumLock将数字小键盘锁定为数字输入,这样,可以通过数字小键盘输入阿拉伯数字. 2、可以通过字母键上面的数字键,直接输入阿拉伯数字.
2、对所有的数字加千分位，并且自动加上尾数.00
'本代码旨在解决WORD中数据转化为千分位
'数据限定要求:-922,337,203,685,477.5808 到 922,337,203,685,477.5807
'转化结果1000以上数据以千分位计算,小数点右侧保留二位小数;1000以下数据不变
Sub yycealjj1()
Dim myRange As Range, i As Byte, myValue As Currency
On Error Resume Next
Application.ScreenUpdating = False '关闭屏幕更新
NextFind: Set myRange = ActiveDocument.Content '定义为主文档文字部分
With myRange.Find '查找
.ClearFormatting '清除格式
.Text = "[0-9]{4,15}" '4到15位数据
.MatchWildcards = True '使用通配符
Do While .Execute '每次查找成功
i = 2 '起始值为2
'如果是有小数点
If myRange.Next(wdCharacter, 1) = "." Then
'进行一个未知循环
While myRange.Next(wdCharacter, i) Like "#"
i = i + 1 '只要是[0-9]任意数字则累加
Wend
'重新定义RANGE对象
myRange.SetRange myRange.Start, myRange.End + i - 1
End If
myValue = VBA.Val(myRange) '保险起见转换为数据,也可省略
myRange = VBA.Format(myValue, "Standard") '转为千分位格式
GoTo NextFind '转到指定行
Loop
End With
Application.ScreenUpdating = True '恢复屏幕更新
End Sub
3、关闭Visual Basic编辑器，回到WORD界面。输入文章后，点击“运行宏”图标，运行yycealjj1宏，即可对数字加千分位。（可以插入模板，以后要用时加载即可）
自动怎么加我不清楚，不过在智能ABC的输入法的状态下打字母V然后按数字键1，然后会出现一系列符号，然后继续按主键盘上的=/+号键，连续按8下，你会发现第3个符号就是千分比符号：‰
没有自动加的功能，不过也很好设的：你点 插入－符号－ 找到“‰”后，在下面有自动更正和快捷键的设置，你设一种就好了。
把楼上的千分符粘贴进去，在工具--自动更正中增加一条，将“%%”自动更正为“‰”。
以后需要打‰时，你只要连续输入两个%就可以了。
那需要通过代码的方式进行，很费事了。
word文档中的表格里的数字怎样自动求和 - …… 1. 选中数据,右键鼠标,设置单元格格式,将数据变成常规或者数值,然后确定.、2.在菜单里,选择公式——自动求和-求和,在选中数据的下一行就会出现求和结果.
如何快速把word里的数字删掉 - …… 举例说明: 1.Word文本正文中数字和文本掺杂,需要将其中的所有数字去掉. 2.按键盘上的Ctrl+H调出替换对话框,上面的框输入[0-9]. 3.点击替换框左下角【更多】按钮. 4.如下图,选择【使用通配符】. 5.点击【全部替换】按钮. 6.关闭对话框,再次查看word文档,文本中就不包括数字了
word中自动编写数字序号的功能是怎么弄出来得 - …… 1 在你的文档第一节处选择右键,项目编号,然后选择编号模式.展开全部2 设置好后,第二节直接回车编号就出来了.
怎样将word文档中数字,自动加“千分符”? - …… 1、打开WORD程序,在上方菜单区域中,右键单击,选中Visual Basic.点击“Visual Basic编辑器”图标,打开Visual Basic,在“ThisDocument ”中双击,然后在右边的窗口中复制下方的代码: 2、对所有的数字加千分位,并且自动加上尾...
如何快速删除word文档中的数字 - …… 1、在word中,用快捷键“ctrl+F”,打开“查找和替换”对话框; 2、”查找内容“输入“^#”,代表任意数字,“替换为”内容为空白; 3、点击“替换”或者“全部替换”,文档中的数字就随着操作消失了.
怎样把word里面的数字统一改成中文数字? - …… 在Word文档中编辑文本内容时我们通常都会为其设置一定的字体字号等效果,比如我们可以为中文设置宋体、小四的效果,为英文字母设置times new Roman字体等等.如果我们需要将文档中所有的数字改为统一的字体和大小,小伙伴们知道...
Word里怎么在框框里面填数字? - …… 1、打开Word文档,在页面中录入一组数字,下图中末尾三个位置为三个方框. 2、首先将三个方框直接替换为需要输入的数字.例如“567”. 3、选择数字“5”,点击工具栏“字体”中的“带圈字符”. 4、在弹出的设置对话框中,选择“增大圈号”,并将圈号选成方框,点击确定. 5、即可将选中的数字“5”变成带框数字了. 6、用同样的方法将数字“6”和“7”都更改为带框数字即可完成设置.
如何word文档将文本中所有数字的加着重号 - …… 操作方式1)快捷方式:Ctrl+D --弹出对话框中的字体里的所有文字---着重号·2)在WORD中的“菜单栏”--格式--字体--所有文字---着重号·
怎么选中WORD文档里的所有数字啊? - …… 1、第一步,打开word2016,新建一个文本文档并输入一段穿插数字的文字段,如下图所示. 2、第二步,按下键盘“ctrl + f”打开查找导航栏,如下图所示. 3、第三步,打开查找栏之后,在输入框中输入“^#”命令,并点击回车键,如下图所示. 4、第四步,完成上述操作之后会发现当前文本中的所有数字都被选中了,如下图所示.
怎样在word文档中输入手写体阿拉伯数字 - …… 在word文档中输入阿拉伯数字,可以通过键盘直接输入. 1、可以按NumLock将数字小键盘锁定为数字输入,这样,可以通过数字小键盘输入阿拉伯数字. 2、可以通过字母键上面的数字键,直接输入阿拉伯数字.
