Word中有不有什么快速的替换方法，把所有的英文标点符号，替换为中文标点符号。

chen8587216 · 发表于 2019-5-4 11:58

用ocr转换过来的文档，标点符号都是英文的，有不有什么方法，一次把英文的标点符号，转换为中文的标点符号了？？？？？

jiangxiaoyun · 发表于 2019-5-4 12:49

貌似得多次替换。。。。通配符不知道行不行

lss001 · 发表于 2019-5-4 13:34

本帖最后由 lss001 于 2019-5-4 15:25 编辑

方法如下:

daibao88 · 发表于 2019-5-4 16:54

413191246se · 发表于 2019-5-4 23:20

* 楼主，你要是会用 VBA 宏，试试杜先生的代码《半角标点转全角》：

Sub Half2Full()
Dim d, x, y, k, t, i%, j%
x = Array(".", ",", ";", ":", "!", "?")
y = Array("。", "，", "；", "：", "！", "？")
Set d = CreateObject("Scripting.Dictionary")
For i = 0 To UBound(x)
d(x(i)) = y(i)
Next
k = d.keys: t = d.items
With ActiveDocument.Content.Find
For j = 0 To d.Count - 1
.Execute "([一-﨩^13^11])" & k(j) & "([0-9一-﨩^13^11])", , , 1, , , , , , "\1" & t(j) & "\2", 2
Next
End With
End Sub

复制代码

chen8587216 · 发表于 2019-5-5 11:14

感谢楼上的各位，我都试一下，看看效果。。。。。。

chen8587216 · 发表于 2019-6-5 20:47

lss001 发表于 2019-5-4 13:34
方法如下:

这个方法可以，就是有的字母或者数字也变为了全角，这个看上去间距就会好大，，，，，，

		自动登录	找回密码
密码			免费注册

[求助] Word中有不有什么快速的替换方法，把所有的英文标点符号，替换为中文标点符号。