VBA worksheet function implementation of a regex replace

RegexReplace.bas

' Simple Example Usage: `=RegexReplace(S181,"(\d+)\.(\d+)\.(\d+)", "$3-$2-$1 00:00:00")` - dd.mm.yyyy formatted date replaced with yyyy-MM-dd HH:mm:ss
' Ensure you add a reference to `Microsoft VBScript Regular Expressions 5.5` (or later)
' Thanks to AutomateThis for their answer pointing me to this library: https://stackoverflow.com/a/22542835/361842


Option Explicit
Option Base 0
Public Function RegexReplace(sourceString As String, matchPattern As String, replaceVar As String, Optional globalRegex As Boolean = True, Optional multiLine As Boolean = True, Optional ignoreCase As Boolean = True) As String
    ' Could improve by adding validation (e.g. is the matchPattern blank), but for now just doing a quick and dirty
    Dim regEx As New RegExp
    regEx.Global = globalRegex
    regEx.multiLine = multiLine
    regEx.ignoreCase = ignoreCase
    regEx.Pattern = matchPattern
    RegexReplace = regEx.replace(sourceString, replaceVar)
    Set regEx = Nothing
End Function