매우 유용한 정규표현식을 Excel에서 사용해 보도록 하자.
우선 Excel을 실행한다.
ALT + F11을 클릭하여 Microsoft Visual Basic Editor를 실행한다.
도구 > 참조 를 클릭하여 Microsoft VBScript Regular Expressions 5.5를 선택한다.
삽입 > 모듈을 클릭하여 모듈을 추가한다.
추가한 모듈에 아래의 스크립트를 삽입한다.
'Match
Function regExpMatch(Value As String, Pattern As String, Optional IgnoreCase As Boolean = False)
Dim r As New VBScript_RegExp_55.RegExp
r.Pattern = Pattern
r.IgnoreCase = IgnoreCase
If r.Test(Value) Then
regExpMatch = True
Else
regExpMatch = False
End If
End Function
'Replace
Function regExpReplace(Value As String, Pattern As String, ReplaceWith As String, Optional IgnoreCase As Boolean = False)
Dim r As New VBScript_RegExp_55.RegExp
r.Pattern = Pattern
r.IgnoreCase = IgnoreCase
r.Global = True
regExpReplace = r.Replace(Value, ReplaceWith)
End Function
함수에서 Optional 인자로 IgnoreCase가 있는데 이것은 대소문자 구별 유무를 의미한다.
사용법은 예제 이미지를 참조하길 바란다.
사용예제
이를 이용하여 삽질을 줄이기 바란다. (또 다른 삽질에 유의하도록!)
