VBA(WORD)での正規表現の一致では1つの結果しか得られません。
この関数を作成しました
Function RE6(strData As String) As String
Dim RE As Object, REMatches As Object
Set RE = CreateObject("vbscript.regexp")
With RE
.MultiLine = False
.Global = False
.IgnoreCase = True
.Pattern = "\[substep [a-zA-Z]\](.*?); {1}"
End With
Set REMatches = RE.Execute(strData)
RE6 = ""
End Function
ここでの問題は、最初の結果しか得られないことです。たとえば、私は文字列を取得しました:
[step 1] title for substeps; [substep a] step a; [substep b] step b; [substep c] step c;
私の結果は次のとおりです。
[サブステップa]ステップa;
ステップbとcではなく、1つの一致のみ。