是否可以使用Excel VBA Range.Find方法查找多个值？

Sub FindMultipleValues()
    Dim rng As Range
    Dim firstAddress As String
    Dim searchValue As Variant
    
    ' 设置要查找的值
    searchValue = Array("Value1", "Value2", "Value3")
    
    ' 设置要查找的范围
    Set rng = Worksheets("Sheet1").Range("A1:A10")
    
    ' 循环查找每个值
    For Each value In searchValue
        ' 使用Range.Find方法查找值
        Set rng = rng.Find(value, LookIn:=xlValues)
        
        ' 如果找到了匹配项
        If Not rng Is Nothing Then
            ' 保存第一个匹配项的地址
            firstAddress = rng.Address
            
            ' 循环查找其他匹配项
            Do
                ' 在这里处理匹配项
                ' ...
                
                ' 继续查找下一个匹配项
                Set rng = rng.FindNext
            Loop While Not rng Is Nothing And rng.Address <> firstAddress
        End If
    Next value
End Sub