正規表現関数を作ってみよう！＠Excel (2)

前回の続き．

misora05.hatenablog.com

今回は実際に正規表現関数を作成してみましょう．

なお，命名方法は，.NET FrameworkのSystem.Text.RegularExpressions名前空間の皆様に倣うことにしましょう．

Regex.IsMatch

正規表現と一致する対象が入力文字列内で見つかったかどうかを示します。

これは簡単ですね．
パターンに一致しているかを判定するのはTestメソッドなので，それを呼び出しその戻り値を受け取るだけです．

Public Function RegEx_IsMatch(ByVal Subject As String _
                            , ByVal Pattern As String _
                            , Optional ByVal IgnoreCase As Boolean = False) As Boolean
    
    With re
        .Pattern = Pattern
        .IgnoreCase = IgnoreCase
        RegEx_IsMatch = .Test(Subject)
    End With
    
End Function

簡単ではありますが，IgnoreCaseプロパティのことは忘れないようにしましょうｗ

Regex.Replace

指定した入力文字列内で正規表現パターンに一致する文字列を、指定した置換文字列に置き換えます。

Public Function RegEx_Replace(ByVal Subject As String _
                            , ByVal Pattern As String _
                            , ByVal Replacement As String _
                            , Optional ByVal IgnoreCase As Boolean = False) As String
    
    With re
        .Pattern = Pattern
        .IgnoreCase = IgnoreCase
        .Global = True
        RegEx_Replace = .Replace(Subject, Replacement)
    End With
    
End Function

これも簡単ではありますが，Globalプロパティを TRUE に設定しておくのは忘れないようにしましょう．