使用正则表达式查找和替换子字符串

Question

我正在尝试使用 Regex for Excel 替换字符串中的子字符串“AV-”。我创建了以下函数，但它没有找到或替换匹配项

Sub simpleRegex()
Dim strPattern As String: strPattern = "[AV-]{AV-}"
Dim strReplace As String: strReplace = "ZS-"
Dim regEx As New RegExp
Dim strInput As String
Dim Myrange As Range

Set Myrange = ActiveSheet.Range("E" & (ActiveCell.Row))

If strPattern <> "" Then
    strInput = Myrange.Value
    strReplace = ""

    With regEx
        .Global = True
        .IgnoreCase = False
        .Pattern = strPattern
    End With

    If regEx.Test(strInput) Then
        ActiveSheet.Range("E" & (ActiveCell.Row)).Value = (regEx.Replace(strInput, strReplace))
    Else
        MsgBox ("Not matched")
    End If
End If

结束子

Answer 1

如果没有样本输入/输出，您还不清楚您想做什么。但是，如果您只想将字符串“AV-”替换为“ZS-”，则您的模式应该是“AV-”。

另外，如果您不知道，有一些正则表达式测试器网站可以帮助您创建/测试您的正则表达式模式，因为复杂的模式会变得非常难以阅读。我推荐的一个站点是https://regex101.com/。请记住，不同语言对正则表达式的实现并不相同，但它至少应该可以帮助您接近。