VBA：查找和替换文本

Question

在我的word文档中，有多个ABC实例，但只有一个ABC123。

我的任务是找到 ABC123 的一个实例并将其复制到单独的 word 文档中。由于我需要整理数千个文档，因此我想制作一个宏来减轻一些麻烦。

请注意，ABC 保持不变，但上面 123 所代表的数字一直在变化。

目前，我尝试组合的宏只能找到以 ABC 开头的所有文本实例。我是否可以在代码中添加“If”来查找以数字结尾的 ABC 实例？

提前致谢！

Answer 1

您可以使用此搜索词来查找ABC后跟 3 位数字的单词：

   ABC^#^#^#

或者，如果您不知道有多少位数字，您可以使用此通配符搜索，它将查找ABC1 到 10 位数字：

  With Selection.Find
    .MatchWildcards
    .Text = "ABC[0-9]{1,10}"
    .Execute
  End With