InStr 能否用于查找多个 String1 值？

Question

我正在处理一些数据，方法是搜索一个列表并打印出与我要查找的条件匹配的单元格的行号。我正在使用 InStr 来执行此操作 - 这可以用于搜索多个项目吗？

我试过 "Or"、"And" 等，但它们似乎不起作用，而且我正在寻找很多标准，所以我不想有太多If 语句。

For Each cell In SrchRng
    If InStr(1, cell.Value, "A" or "B") > 0 Then


   'Print row number...

     End If
Next cell

End Sub

Run-time error "13" Type mismatch

出现以上情况。实际输出将是 "A" 或 "B" 出现的行号。

Answer 1

您可以尝试添加一些代码来缩短您的代码，也可能使其更具可读性：

If InStr(1, cell.Value, "A") + _
   InStr(1, cell.Value, "B") > 0 Then
     'do stuff
End If

Can InStr be used to find multiple String1 values?