当前位置:首页经验技巧Word经验word文档

word如何把数字千分位,千分,数字

2026-01-20 10:14:28

1.word2007数字千分位怎么设

手动输入个英文逗号就行,如有你非要高难度的,我转一个文章给你,你看看吧

采用了VBA编写了一个小程序来实现这一功能,以方便有这方向烦恼的读者,程序如下:

Sub 改变数字格式为千分位格式 ()

Dim strWithTh As String '用于保存处理后的数字

Dim intI As Integer '循环给定的数字

Dim intLen As Integer '求数字长度

Dim intCount As Integer '保存改变个数

With Selection

.HomeKey Unit:=wdStory '回到文章开头

.Find.ClearFormatting

Do

.Find.Text = "^#^#^#^#" '查找4位数字

'如果没有找到,退出

If .Find.Execute = False Then

MsgBox "长春崔宇的程序:千分位设置完毕!共改变 " & intCount & "个数字。", vbInformation

Exit Sub

End If

intCount = intCount + 1 '计数器增加

.MoveLeft '移到整个数字的左边

.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend '选择整个数字

intLen = Len(.Text)

strWithTh = "" '清空

For intI = intLen To 1 Step -3

If intI > 3 Then

strWithTh = "," & Mid(.Text, intI - 2, 3) & strWithTh

Else

'对于长度为3的倍数的数字特别处理

strWithTh = Left(.Text, IIf(intLen Mod 3 = 0, 3, intLen Mod 3)) & strWithTh

End If

Next

.Text = strWithTh

.MoveRight '右移一个来取消选择

Loop

End With

End Sub

将上面的代码,保存在NORMAL模板中,需要运行时,按ALT+F8选择该宏运行就可以了,当然也可为这个宏分配一个按钮。

程序的实现方法:程序是以WORD的查找为基础,找到四位以上的数字,然后选择这个数字,将其变为千分位格式后写回,循环到查找结束。当然代码中并没有对数字进行细致的分析,所以对“2002年”这样不应加千分位的数字也会处理。代码在OFFICE9,OFFICE10,OFFICE11,OFFICE12上运行通用。

2.word中怎样对数字使用千位分隔符

word中没有自动添加千位分隔符的功能,需要通过替换功能手工实现。

具体操作步骤如下:

1、打开word;

2、点击word中的“编辑”菜单,在下拉菜单中点“替换”,出现“查找和替换”对话框;

3、点“高级”按钮, 勾选“使用通配符”复选框;

4、“查找内容”中填入:([0-9])([0-9]{3})([.,]),“替换”中填入:\1,\2\3 ;

注意:查找内容:([0-9])([0-9]{3})([.,])和替换为: \1,\2\3是固定不变的,在输入法为英文半角的状态输入。

5、执行“全部替换”,重复按“全部替换”按钮,直到提示“替换0处”为止;

6、替换完成后,效果如下图,完成。

3.word如何把数字设为千分位?

word中,没有自动实现数字转换为千分位格式的方法,只能通过手工编写宏命令的方法来实现。

具体步骤如下: 1、打开word;' 2、按alt+F11打VBA编辑器,点击插入->模块; 3、在模块窗口输入以下宏指令: Sub FormatNumbers() Selection.TypeText Text:=Format(Selection, "#,##0.00") End Sub 4、保存退出VBA编辑器; 5、点击office按钮->word选项; 6、打开自定义对话框,选择宏,点击添加,确定; 7、选择需要设置会计格式的数字,点击快捷栏中的宏命令; 8、完成。

4.word里面怎么把数字设为千分位

word中,没有自动实现数字转换为千分位格式的方法,只能通过手工编写宏命令的方法来实现。

具体步骤如下: 1、打开word;' 2、按alt+F11打VBA编辑器,点击插入->模块; 3、在模块窗口输入以下宏指令: Sub FormatNumbers() Selection.TypeText Text:=Format(Selection, "#,##0.00") End Sub 4、保存退出VBA编辑器; 5、点击office按钮->word选项; 6、打开自定义对话框,选择宏,点击添加,确定; 7、选择需要设置会计格式的数字,点击快捷栏中的宏命令; 8、完成。

5.word数字千位分隔符

原发布者:ijltx

我们在word文档中会写很多数据,有些带小数点,有些不带,但为了直观,需要把这些数据全部设置为“千位分隔符”的格式,如:100000.00元,转换为100,000.00元(每3位数加一个英文半角逗号)。手工添加,既费时费力,效率低,还会出错;用编制宏代码的方法,又不易学会。有没有一种简单的方法在数据里设置千位分隔符呢?答案是肯定的。在实际工作中,通过“全部替换”按钮,就能完成整篇文档财务数据千位分隔符的添加,并且年份数字不受影响。具体方法如下:(1) 用CTRL+H快捷键,或者点击菜单或按钮: 2007以下版本,点击word中的“编辑”菜单,在下拉菜单中点“替换”,出现“查找和替换”对话框。 2007及以上版本,则在功能区点击“编辑”按钮,再点击"替换", 如图:


电脑版

免责声明:本站信息来自网络收集及网友投稿,仅供参考,如果有错误请反馈给我们更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任,谢谢您的合作。
版权所有:五学知识网 Copyright © 2015-2026 All Rights Reserved .