word中替换数字如何办

1.关于在word中替换数字的问题

这个需要借助excel表格的功能，具体方法比较繁琐，请按照步骤操作：

1、将文档中的回车符替换成一个文档中没有的字符串比如“大江东去”，方法：

ctrl+h调出替换对话框

查找内容输入：^p

替换为输入：大江东去

点击全部替换

2、将所有的数字前后增加回车符，方法：

ctrl+h调出替换对话框

查找内容输入：（[！0-9]）([0-9]{1,22})

替换为输入：\1^p\2^p

高级或更多选择“使用通配符”，点击全部替换

3、复制所有内容（ctrl+a全选，ctrl+c复制），然后粘贴到excel中的A列，向下滚动鼠标滚轮，找到粘贴的最有一个单元格（鼠标除了滚动外，不要点击表格的任何位置），鼠标左键点住这个单元格的右下角的那个黑点，并向右拖拽到C列，此时，C列的所有数字都是A列对应数字+2，然后复制C列的全部内容，粘贴回一个新建的word文档中，并选择“仅保留文字”

4、将所有的回车符替换掉，方法：

ctrl+h调出替换对话框

查找内容输入：^p

替换为空着，点击全部替换

5、将特殊字符串“大江东去”替换为回车符，方法：

ctrl+h调出替换对话框

查找内容输入：大江东去

替换为输入：^p

点击全部替换即可。

2.word替换里代替数字

首先，你要的效果可以很轻松的实现；

其次，不太理解你说的“每行内容”、“点 的位置”等是什么意思，所以没法给你设计准确的替换方法，只能跟你说一下关键点是什么：

打开查找与替换界面，在勾选“使用通配符”的情况下（关键点1），可以用[0-9]@来表示1个或多个数字（关键点2），这样你就可以不用在乎中间的数字怎么变动了。

比如，查找内容：位置[0-9]@=

替换为：^&A

这样就可以在等于号后面统一加上A（^&代表查找内容）

再比如，查找内容：位置[0-9]@=

替换为：位置A=

这样就可以把所有的“位置”后面的数字替换成A

----------------

因为没法充分理解你的意思，所以只能写成这样，有不懂的可以再问。另外，下次问这样的问题时，最好来两张截图，一张是原文，一张是你想要实现的效果（不要用某种字母、代号什么的来表达某种意义，比如你提问中的“点”），对比之下，人家就很容易理解了。

3.word中数字的替换问题

这个需要借助excel表格的功能，具体方法比较繁琐，请按照步骤操作：

1、将文档中的回车符替换成一个文档中没有的字符串比如“大江东去”，方法：

ctrl+h调出替换对话框

查找内容输入：^p

替换为输入：大江东去

点击全部替换

2、将所有的数字前后增加回车符，方法：

ctrl+h调出替换对话框

查找内容输入：（[！0-9]）([0-9]{1,22})

替换为输入：\1^p\2^p

高级或更多选择“使用通配符”，点击全部替换

3、复制所有内容（ctrl+a全选，ctrl+c复制），然后粘贴到excel中的A列，向下滚动鼠标滚轮，找到粘贴的最有一个单元格（鼠标除了滚动外，不要点击表格的任何位置），鼠标左键点住这个单元格的右下角的那个黑点，并向右拖拽到C列，此时，C列的所有数字都是A列对应数字+2，然后复制C列的全部内容，粘贴回一个新建的word文档中，并选择“仅保留文字”

4、将所有的回车符替换掉，方法：

ctrl+h调出替换对话框

查找内容输入：^p

替换为空着，点击全部替换

5、将特殊字符串“大江东去”替换为回车符，方法：

ctrl+h调出替换对话框

查找内容输入：大江东去

替换为输入：^p

点击全部替换即可。

4.如何在word里有规律的替换数字

Sub Macro1()

Dim nStr As String, Str1 As String, Str2 As String

Dim I As Long, M As Long, N As Long, S As Long

Str1 = "dddd" '待替换的字符

N = Len(Str1)

nStr = ActiveDocument.Range.Text

Do

S = InStr(S + 1, nStr, Str1)

If S = 0 Then Exit Do

I = I + 1

Str2 = I

M = 4 - Len(Str2)

If M > 0 Then Str2 = String(M, "0") & Str2

nStr = Left(nStr, S - 1) & Str2 & Mid(nStr, S + N)

S = S + N - 1

Loop

ActiveDocument.Range.Text = nStr

End Sub