如何将文档中大量的英文""引用符号批量提换为“”中文引用符号

兵河之心

要处理的文档中有大量不同的非中文的""引用语，
如"酒色财气"、"思思如年"等等不同的引用词语，
需要替换成：
中文的双引号“酒色财气”、“思思如年”引用等等，
但不能替换掉引号里面的词句！！
简单的替换肯定不行！
请教高手：
怎么用正则式实现批量替换？
谢谢！！！

413191246se

Sub 替换英文双引号为中文()
    Selection.WholeStory
    Selection.Find.ClearFormatting
    Selection.Find.Replacement.ClearFormatting
    With Selection.Find
      .Text = """"
      .Forward = True
      .Wrap = wdFindStop
      .MatchByte = True
    End With
    With Selection
      While .Find.Execute
          .Text = ChrW(8220)
          .Find.Execute
          .Text = ChrW(8221)
      Wend
    End With
End Sub

兵河之心

谢谢！
但看不懂！！！
有没有更简单点的？

慕容秋白

可以使用通配符进行替换：
在查找替换对话框中，点击更多按钮，勾选”使用通配符“
然后在查找内容中输入：(“)(*)(”)
替换为中输入："\2"
点击全部替换就可以了

zhanglei1371

413191246se 发表于 2014-7-11 15:21
Sub 替换英文双引号为中文()
    Selection.WholeStory
    Selection.Find.ClearFormatting

代码没有测试吧？
使用selection的execute若不接着用collapse，就只能替换一出

兵河之心

慕容秋白 发表于 2014-7-11 22:29
可以使用通配符进行替换：
在查找替换对话框中，点击更多按钮，勾选”使用通配符“
然后在查找内容中输入 ...

在WPS下虽然英文双引号可以替换为中文双引号，
但是引用的词句也一起被替换成:
\2
哪里的问题？版本问题？换WORD试试！
经测试：

确实是WPS不支持，WORD可以！

特别提示：

1、在WORD 2010替换前，需要特别处理！！

2、WPS里不能在替换处输入：“\2”,需特别处理！！

413191246se

Word 2003 中，测试是成功的，代码是网上高人写的（不是守版就是别人）。——楼主，你应该学一点宏（VBA）的知识了。

兵河之心

413191246se 发表于 2014-7-14 10:56
Word 2003 中，测试是成功的，代码是网上高人写的（不是守版就是别人）。——楼主，你应该学一点宏（VBA）的 ...

谢谢建议！！！