word文档如何快速删除原文最后段落的标点符号，并加新的标点符号

asd98898

由于书写不规范，在最后的段落有的是，号，有的。号，现想把最后的不规范的符号都删除掉，重新加上。号。多谢老师指教。 word文档如何快速删除原文最后段落的标点符号，并加新的标点符号.rar (3.18 KB, 下载次数: 13)

2014-11-22 09:50 上传

点击文件名下载附件

pipiludaxian

Sub test001()
Dim mypar As Paragraph
For Each mypar In ActiveDocument.Paragraphs
    Set t = mypar.Range.Characters.Last.Previous
    Debug.Print t
    If t = "，" Then
       t.Text = "。"
    End If
Next
End Sub

周星骋

替换也可。

勾选“使用通配符”，
查找内容

1. [!一-龥^13^48-^57^65-^90^97-^122](^13)

复制代码

替换为

1. 。\1

复制代码

点“全部替换”按钮。