EXCELでタグ付き正規表現

サクラエディタでタグ付き正規表現ができないみたい。
秀丸ならできるのにな。
探してみたらEXCELでできるみたいなので、拝借。

' 正規表現による置換
Function RegReplace(ByRef strSource As String, _
　　　　　　　　　　ByRef strPattern, _
　　　　　　　　　　ByRef strReplacement As String) As String


　　'動作環境： IE5.0以上がインストールされていること
　　'参照設定： Microosft VBScript Regular Expressions x.x

　　Dim REG As REGEXP
　　Set REG = New REGEXP
　　With REG
　　　　.Pattern = strPattern
　　　　.IgnoreCase = False
　　　　.Global = True
　　　　RegReplace = .Replace(strSource, strReplacement)
　　End With
　　Set REG = Nothing

End Function

秀丸使えないときはこれを使うしかない。


訂正。サクラエディタでも使えるみたいです。