我使用VBA代码(使用Microsoft VBScript正则表达式5.5库)替换从bug跟踪系统到超级链接的邮件中的纯文本ID。
该消息可以包含诸如"Bug 1234567“或”问题1234567“之类的刺。
我使用以下代码来匹配第一个选项:
Set re = CreateObject("vbscript.regexp")
re.Pattern = "Bug [0-9][0-9][0-9][0-9][0-9][0-9][0-9]"
For Each match In re.Execute(body)
MsgBox match.Value
Next我想同时兼顾这两种选择。
以下模式不起作用。只有一个选项仍然匹配(替换)。
re.Pattern = "(Bug|Issue) [0-9][0-9][0-9][0-9][0-9][0-9][0-9]"
re.Pattern = "(Bug [0-9][0-9][0-9][0-9][0-9][0-9][0-9])|(Issue [0-9][0-9][0-9][0-9][0-9][0-9][0-9])"发布于 2015-11-12 08:02:38
您的模式很好,但是可以通过显式声明它应该包含[0-9] 7次来简化它,即:
(Bug|Issue) [0-9]{7}您缺少的是Global属性,根据本站,该属性指定正则表达式应该匹配所有事件-而不仅仅是第一次。所以你的整个代码变成:
Set re = CreateObject("vbscript.regexp")
re.Global = True
re.Pattern = "(Bug|Issue) [0-9]{7}"
For Each match In re.Execute(body)
MsgBox match.Value
Nexthttps://stackoverflow.com/questions/33666241
复制相似问题