相同的正则表达式可以使用SED正常运行，但不能在VBA中使用

Question

我需要在标记之间进行匹配：

<h1>hello!</h1>

我正在使用以下模式，该模式在SED上可以正常运行，但在VBA上不起作用。

Set documento = ActiveDocument.Range   

Set oRegExp = New RegExp
oRegExp.Pattern = "/<h1>/,/<\/h1>/p"
oRegExp.Global = True
oRegExp.MultiLine = True

Dim resultado As MatchCollection
Set resultado = oRegExp.Execute(documento)

For Each r In resultado
    MsgBox r
Next r