8

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つの一致のみ。

4

1 に答える 1

12

GlobalをTrueに設定する必要があります

http://msdn.microsoft.com/en-us/library/tdte5kwf%28v=vs.84%29

于 2012-09-06T13:29:35.737 に答える