vba excel - 查找字符串通配符

Question

我在做一个简单的excel搜索引擎，想做一些通配符，例如：

我有一个单元格，用户在其中输入搜索词（仅数字），应该如下所示：“123456”。 然后，我有另一个工作簿，我在其中准确搜索“123456”。我设法做到了。

但是，如何制作通配符？例如，我希望用户能够搜索：“123?56”，我会给他的结果是：“123456”、“123356”、“123556”等。

这就是我寻找完全匹配的方式：

set rFound = wks.UserRange.Find(strToSearch, LookIn:=xlValues, lookat:=xlwhole, MatchCase:=False)

有什么想法吗？

谢谢

Answer 1

您可以在循环中或与Find 一起使用通配符：

Sub dural2()
    MsgBox Range("A1:A10").Find(What:="123*56", After:=Range("A1")).Row
End Sub

或与Like循环：

Sub dural()
    For Each r In Range("A1:A10")
        If r.Value Like "123*56" Then
            MsgBox r.Address
        End If
    Next r
End Sub