excel - Excel VBA中的类似运算符

我在for循环中有一个if语句，在其中试图使用like运算符将当前Cell值与其他字符串进行比较。由于某种原因，这给了我一个类型不匹配的错误。这是因为rng5.Cells(i, 1).Value不是字符串吗？任何帮助将不胜感激！我在下面粘贴了原始代码。

For i = 1 To rng5.Rows.Count

    If rng5.Cells(i, 1).Value Like "*test*" Or "*Test*" Or "*Demo*" Or "*demo*" Then
        rng5.Cells(i, 1).EntireRow.Hidden = True
    End If
Next i

最佳答案

使用Instr函数

For i = 1 To rng5.Rows.Count

    If instr(1,rng5.Cells(i, 1).Value, "test")>0  Or instr(1,rng5.Cells(i, 1).Value, "Test")>0 Or instr(1,rng5.Cells(i, 1).Value, "demo")>0  Or instr(1,rng5.Cells(i, 1).Value, "Demo")>0 Then
        rng5.Cells(i, 1).EntireRow.Hidden = True
    End If
Next i