正規表現について

質問

ExcelにてVBScriptの正規表現を使用していますが、
理解できないところがあるので、教えてください

１．EXCEL VBAにて下記のコードがあります

Sub Sample2()
Const strCHK As String = "000AAA111BBB2222BBB333"

Dim RE, strPattern As String, i As Long, msg As String, reMatch, Item
Set RE = CreateObject("VBScript.RegExp")
strPattern = "AAA.+bbb"
With RE
.Pattern = strPattern
.IgnoreCase = True
.Global = True
Set reMatch = .Execute(strCHK)
For Each Item In reMatch
Debug.Print Item.Value & " FirstIndex→" & Item.FirstIndex & " Length→" & Item.Length
Next

End With
Set reMatch = Nothing
Set RE = Nothing
End Sub

２．上記を動作させると、イミディエイトに下記が出力されます
AAA111BBB2222BBB FirstIndex→3 Length→16

３．疑問
strPattern = "AAA.+bbb"にて検索しているのに、
AAA111BBBが表示されないのは、何故なのでしょうか？

よろしくお願いします

回答No.1

morchin · ベストアンサー

貪欲マッチしているからでは？
最短マッチにする必要があります。
試していませんが、
strPattern = "AAA.+?bbb"
では、どうですか？

お礼

morchinさん　早速のコメｒントありがとうございます

指摘とおりでした