VBA用户窗体：带方括号的筛选器名称

我在用方括号搜索名称时遇到问题：例如Peter[Jones]（combobox1）。它找不到那个名字

如何解决这个问题？任何人都可以提供帮助或建议

Dim a, LngIndex As Long
Dim ytCrit, mtCrit, dtCrit As Long
Dim yuCrit, muCrit, duCrit As Long
Dim sCrit As String
Dim tCrit, uCrit As Date
Dim vCrit, wCrit As Long
Dim tngSource As Range
Dim LastRow As Long

LastRow = Worksheets("Sheet2").Cells(Cells.Rows.Count, "K").End(xlUp).Row

On Error Resume Next

Set tngSource = Worksheets("Sheet2").Range("A2:K" & LastRow)

sCrit = "*" & UCase(ComboBox1) & "*"
With ListBox1
    For a = .ListCount - 1 To 0 Step -1
        If Not UCase(.List(a, 1)) Like sCrit Then
            .RemoveItem a
        End If
    Next a
End With

…使用方括号搜索搜索名称：例如Peter[Jones]

Like

运算符的方括号

[

和

]

包含要在匹配中搜索的字符列表。这并不意味着像“[Jones]”这样的名字是可选的

所以像“[Jones]”这样的

s将匹配任何包含J、o、n、e或s的元素

正如用户GSerg所写，使用
InStr
函数在字符串中搜索子字符串。搜索将区分大小写。
如果您像使用

一样使用，则必须转义不正确的模式中的字符。在您的特定情况下，只需使用

InStr

。