跳到主要内容

如何在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 人工智能助手:用人工智能改变你的写作 - 生成内容  /  重写文本  /  总结文件  /  查询资料 基于文档,全部在Word中

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

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

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

创意插入: 插 千位分隔符  /  复选框  /  单选按钮  /  扫码支付  /  条码  /  对角线表  /  公式标题  /  图片说明  /  表标题  /  多张图片  / 发现更多 插入组...

🔍 精准选择:精确定位 特定页面  /    /  形状  /  标题段落  / 增强导航功能 更多 选择功能...

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

👉 想尝试这些功能吗? Kutools for Word 提供了 60-day免费试用,没有任何限制! 🚀
 
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