如何检查单元格是否包含VBA中的两个字符串

Question

如何检查单元格中是否包含两个单独的字符串？我试过：

ElseIf InStr(1, UCase(testVal), UCase("goku"), 1) And InStr(1, UCase(testVal), UCase("vegeta"), 1) Then
            Worksheets("Export Worksheet").Cells(i, 18).EntireRow.Interior.ColorIndex = "4"

不过，这不管用..。

如果我用

ElseIf InStr(1, UCase(testVal), UCase("goku"), 1) & InStr(1, UCase(testVal), UCase("vegeta"), 1) Then
            Worksheets("Export Worksheet").Cells(i, 18).EntireRow.Interior.ColorIndex = "4"

如果“悟空”或"vegeta“在单元格中，则将突出显示行。但是，我需要两个值都在单元格中。

请帮帮我！

Answer 1

您希望InStr的结果大于0。也可以使用“和"&”

ElseIf InStr(1, UCase(testVal), UCase("goku"), 1) > 0 AND InStr(1,     UCase(testVal), UCase("vegeta"), 1) > 0 Then
        Worksheets("Export Worksheet").Cells(i, 18).EntireRow.Interior.ColorIndex = "4"