跳到主要内容

如何在Word文档中的数字上添加千位分隔符?

在Excel中,可以使用“使用1000分隔符”功能将数字自动添加1000分隔符,但是您知道如何在Word文档中向数字添加1000分隔符吗? 在这里,我介绍了一些在Word中处理此工作的技巧。

使用快捷方式添加1000个分隔符

用符号添加1000个分隔符

使用VBA添加1000个分隔符

使用 Kutools for Word 添加 1000 分隔符好主意3


使用快捷方式添加1000个分隔符

在Word中,您可以使用快捷方式添加千位分隔符。

将光标放在要插入1000分隔符的位置,按 其他 键,然后按 044 在数字键盘中。


用符号添加1000个分隔符

或者,您可以使用Symbol函数插入1000分隔符。

1.将光标置于要插入1000分隔符的位置,单击 插页 > 图形符号 > 更多符号.
doc添加千位分隔符1

2.在 图形符号 对话框下 符号 标签选择 宋体字体 下拉列表,然后选择 基础拉丁语子集 下拉列表,现在从列表中选择1000个分隔符,然后单击 插页 插入它。
doc添加千位分隔符2

备注:使用以上两种方法,一次只能插入一千个分隔符。 如果要一次将数千个分隔符插入多个数字,请尝试以下方法。


使用VBA添加1000个分隔符

有时,一个数字需要插入几千个分隔符。 在这种情况下,您可以使用VBA代码。

1.选择要插入千位分隔符的数字,按 Alt + F11键 打开钥匙 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块,将以下代码复制并粘贴到 模块.

VBA:为数字添加1000个分隔符

Sub AddCommasToNumbers()
'UpdatebyExtendoffice20181106
    Dim xWarp As Integer
    If Selection.Type = wdSelectionIP Then
        ActiveDocument.Range(0, 0).Select
        xWarp = wdFindContinue
    Else
        xWarp = wdFindStop
    End If
    With Selection.Find
        .ClearFormatting
        .Text = "[0-9]{4,}"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = xWarp
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchAllWordForms = False
        .MatchSoundsLike = False
        .MatchWildcards = True
        Do While .Execute
            Selection.Text = Format$(Selection.Text, "#,##0")
            If xWarp = wdFindContinue Then
                Selection.Collapse wdCollapseEnd
            Else
                Exit Sub
            End If
        Loop
    End With
End Sub

3。 按 F5 键,已将数千个分隔符插入到所选编号。
doc添加千位分隔符3


使用 Kutools for Word 添加 1000 分隔符

如果要将分隔符插入选择中的多个数字或Word中的整个文档,则 添加千位分隔符 实用程序 Kutools for Word 可以通过点击来解决这项工作。

Kutools for Word, 与超过 {模块753} 方便的功能,使您的工作更加轻松。 

安装后 Kutools for Word,请执行以下操作:(立即免费下载 Kutools for Word!)

要为整个文档中的所有数字添加千位分隔符,只需不选择任何数据,请单击 库工具 > 添加千位分隔符.
doc添加千位分隔符4

弹出一些对话框以确保是否要将此功能应用于整个文档,请单击 > OK.
doc添加千位分隔符5 doc添加千位分隔符6

现在,所有数字均已插入1000个分隔符。
doc添加千位分隔符7

如果要在选择的数字中添加1000个分隔符,请选择数字并单击 库工具 > 添加千位分隔符.
doc添加千位分隔符8

备注:如果要删除千位分隔符,可以单击Kutools>删除>删除千位分隔符。

最佳办公生产力工具

Kutools for Word - 通过 Over 提升您的文字体验 100 显着特点!

深入了解下面突出显示的功能或 单击此处探索 Kutools for Word 的全部功能.

📘 文档掌握: 分页  /  合并文件  /  以各种格式导出选择(PDF/TXT/DOC/XLSX)  /  批量转换为PDF  /  将页面导出为图像  /  一次打印多个文件 ...

内容编辑: 批量查找和替换 跨多个文件   /  调整所有图片的大小   /  转置表行和列  /  将表格转换为文字 ...

🧹 轻松清洁扫开 多余的空间  /  分节符  /   所有标题  /  文本框  /  超链接  /  如需更多删除工具,请前往我们的删除组

创意插入: 插页 千位分隔符  /  复选框  /  单选按钮  /  二维码  /  条码  /  对角线表  /  公式标题  /  图片说明  /  表标题  /  多张图片  /  在我们的插入组中发现更多信息

🔍 精准选择: 精确定位特定页面  /    /  形状  /  标题段落  /  使用我们的选择组轻松导航

星级增强: 快速导航至任何位置  /  自动插入重复文本  /  在文档窗口之间无缝切换  /  11 转换工具 ...

使用 Kutools 转换您的 Word 任务。 👉 立即下载并试用 30 天 🚀。

了解更多       免费下载      购买
 
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi
A simpler way is just to copy "002C" and paste in the "character code" box and click insert.
no need to select Verdana or Basic Latin
This comment was minimized by the moderator on the site
Thanks for your macro. But it has two problem:
1) After using macro, leading zero of numbers like phone number will be removed!!!
2) Macro works bad for number with more than 30 digits.!!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations