VBAで正規表現ライブラリ(RegEx)をちょっと使いやすくする

VBA正規表現を使いやすくするため、ヘルパ関数を作ってみた。

'   正規表現オブジェクトを生成するヘルパ関数
Public Function r(pattern_ As String) As RegExp
    Set r = New RegExp
    r.pattern = pattern_
End Function

以下のようにつかえます。

? r("^abc").Test("aaa")
False

? r("^abc").Test("abc")
True

それだけなんです。
スミマセン。