엑셀에서 COUNTIF로 정규식(Regex) 패턴 개수 세기

Microsoft Excel을 사용하다 보면 특정 패턴을 찾기 위해 정규식(Regex)이 필요한 순간이 있습니다. 하지만 안타깝게도 엑셀은 기본적으로 정규식을 지원하지 않기 때문에 많은 분들이 어려움을 겪곤 합니다. 이 글에서는 VBA로 RegExMatch 사용자 정의 함수를 만들고, 이를 COUNTIF 함수와 결합해 정규식 패턴과 일치하는 셀의 개수를 세는 방법을 단계별로 소개합니다.

엑셀에서 COUNTIF로 정규식 개수 세기: 상세 단계

아래 과정을 따라 하면 VBA 헬퍼 함수와 COUNTIF를 활용해 엑셀에서 정규식 일치 항목을 손쉽게 집계할 수 있습니다.

1단계: 정규식 매칭용 데이터 준비

연락처 목록(Contact List) 데이터셋이 있다고 가정해 보겠습니다. 이 표에서 각 항목이 유효한 전화번호 형식인지 확인하기 위해 COUNTIF 함수와 정규식을 함께 사용할 것입니다.

아래 이미지처럼 연락처 목록이 준비되어 있으며, 여기서 어떤 값이 전화번호 패턴에 부합하는지 검토하게 됩니다.

엑셀에서 COUNTIF로 정규식(Regex) 패턴 개수 세기 – 단계별 완벽 가이드

2단계: VBA로 사용자 정의 헬퍼 함수 만들기

엑셀이 정규식을 직접 지원하지 않기 때문에, VBA 코드를 사용해 RegExMatch 함수라는 사용자 정의 헬퍼 함수를 먼저 만들어야 합니다. 아래 지침을 따라 해보세요.

먼저 통합 문서가 열려 있는 상태에서 ALT + F11 키를 눌러 "Microsoft Visual Basic for Applications" 편집기를 엽니다.
다음으로 메뉴에서 삽입(Insert) 옵션을 선택한 뒤 "모듈(Module)"을 클릭합니다.

엑셀에서 COUNTIF로 정규식(Regex) 패턴 개수 세기 – 단계별 완벽 가이드

새 모듈 창에 아래 코드를 붙여넣고 저장합니다.

Public Function RegExMatch(input_reg_range As Range, reg_pattern As String, Optional reg_match As Boolean = True) As Variant
  Dim WX() As Variant
  Dim Input_Row, Input_Col, cnt_Rows, cnt_Cols As Long
  On Error GoTo ErrHandl
  RegExMatch = WX
  Set Wregex = CreateObject("VBScript.RegExp")
  Wregex.pattern = reg_pattern
  Wregex.Global = True
  Wregex.MultiLine = True
  If True = reg_match Then
    Wregex.ignorecase = False
  Else
    Wregex.ignorecase = True
  End If
  cnt_Rows = input_reg_range.Rows.Count
  cnt_Cols = input_reg_range.Columns.Count
  ReDim WX(1 To cnt_Rows, 1 To cnt_Cols)
  For Input_Row = 1 To cnt_Rows
    For Input_Col = 1 To cnt_Cols
      WX(Input_Row, Input_Col) = Wregex.Test(input_reg_range.Cells(Input_Row, Input_Col).Value)
    Next
  Next
  RegExMatch = WX
  Exit Function
ErrHandl:
    RegExMatch = CVErr(xlErrValue)
End Function

엑셀에서 COUNTIF로 정규식(Regex) 패턴 개수 세기 – 단계별 완벽 가이드