搜索和替换数字

Question

我在文档中使用了很多图表，需要按顺序重新编号。我可以使用以下方法查找文本中下一个出现的数字：

Selection.Find.ClearFormatting
With Selection.Find
    .Text = "^#"

但是这只选择了第一个数字。如果我用它将 1 替换为 5，效果很好，但如果要替换的数字是 10，那么我最终会将其替换为 50。在替换之前，如何确保选择了整个数字？

Answer 1

以下是查找任意数字的正则表达式：

<[0-9]{1,}

我已经对这段文字进行了测试：

5

50

500

5000 500 5000 20 5 00000000000

显然，必须启用通配符。