【发布时间】:2021-04-01 10:04:16
【问题描述】:
我正在尝试在 excel 中匹配正则表达式 VBA 中的方括号,即 []。我正在尝试使用以下代码,但它不起作用。
Public Function IsSpecial(s As String) As Long
Dim L As Long, LL As Long
Dim sCh As String
IsSpecial = 0
For L = 1 To Len(s)
sCh = Mid(s, L, 1)
If sCh Like "[0-9a-zA-Z/;@%,'‚.+&/\(): ]" Or sCh = "_" Or sCh Like "[-]" Or sCh Like "\[" Then
Else
IsSpecial = 1
Exit Function
End If
Next L
End Function
【问题讨论】:
-
Like不支持正则表达式,它只支持通配符。 -
如果 sCh 喜欢 "[0-9a-zA-Z/;@%,'‚.+&/(): ]" 或 sCh = "_" 或 sCh 喜欢 "[-]" Or sCh Like "[" 这是我的实际情况,like 工作正常,只有最后一个 OR 条件不起作用
-
不,它不起作用。
-
好的,刚刚找到,你需要
Ch Like "[[]"。 -
不,仍然无法正常工作。我已经更新了我的问题。因此,如果代码找到 [] 它应该返回 0 但在使用上述建议后它仍然返回 1