Question

我有以下IF声明

If .Cells(r, "L").Value Like "Milestone*" Then
        If UBound(Split(.Cells(r, "L"), ",")) > 0 Then
            i = i + 1
            ReDim v(1 To i)
            v(i) = pasteRowIndex
        End If

我还需要包含此关键字不区分大小写，但在尝试时遇到运行时错误。

有快速解决方案吗？

Answer 1

最快的解决方案 - 将这两个值都放在LCase（或UCase）中：

If LCase(.Cells(r, "L").Value) Like LCase("Milestone*") Then

或者LCase只有一个，而另一个正常写。

Sub TestMe()

    Debug.Print LCase("Milestonea") Like "milestone*"
    Debug.Print LCase("Milestonea") Like "Milestone*"

End Sub

Excel IF语句匹配关键字以忽略大小写

1 个答案: