Question

我有一个简单的问题。我正在搜索文件中是否出现括号内的数字，例如： [4]或[14]等。我可以编写一个模式来查找单个数字或双数字，但如何使用匹配这两种情况的单个FindText模式？

以下是单位数字案例的工作代码：

set fnd=ActiveDocument.Range.Find
While (fnd.Execute(FindText:="\[[0-9]\]", MatchWildcards:=True))
    ...
    Do Stuff
    ...
Wend

我如何调整它以包括第二个数字的可能性？谢谢你的帮助！

Answer 1

Sub SearchNumbersInSqBrackets()

    Dim rng
    Set rng = ActiveDocument.Range

    With rng.Find
        .Text = "\[[0-9]{1,2}\]"
        .MatchWildcards = True

        Do While .Execute(Forward:=True)
            Debug.Print rng.Text
        Loop

    End With
End Sub

请参阅此处的＃7 - http://wordmvp.com/FAQs/General/UsingWildcards.htm

Word VBA：带有可选字符的Findtext模式（Find方法）

1 个答案: