이 페이지에서
구문
= Splitter ( 문자열, 시작문자, [마지막문자] )
인수구분
형식 설명
문자열
필수
Variant
원본 문자열입니다.
시작문자
필수
String
문자열 추출을 시작할 기준이 되는 문자입니다. 시작 문자가 종료된 지점부터 문자열을 추출합니다.
예를 들어 Splitter("합계:123", "합계:") 는 "123"을 반환합니다.
마지막문자
선택
String
문자열 추출을 종료할 기준 문자입니다. 마지막 문자가 시작된 지점에서 추출을 종료하며, 생략하면 시작문자 이후 값을 모두 반환합니다.
예를 들어 Splitter("합계:123원","합계:","원") 은 "123"을 반환합니다.
마스터 코드
복사한 코드는 VBA 편집기(Alt + F11) 새 모듈에 붙여넣어 사용하세요Function Splitter(v As Variant, Cutter As String, Optional Trimmer As String)
'###############################################################
'오빠두엑셀 VBA 사용자지정함수 (https://www.oppadu.com)
'▶ Splitter 함수
'▶ Cutter ~ Timmer 사이의 문자를 추출합니다. (Timmer가 빈칸일 경우 Cutter 이후 문자열을 추출합니다.)
'▶ 인수 설명
'_____________v : 문자열입니다.
'_________Cutter : 문자열 절삭을 시작할 텍스트입니다.
'_________Trimmer : 문자열 절삭을 종료할 텍스트입니다. (선택인수)
'▶ 사용 예제
'Dim s As String
's = "{sa;b132@drama#weekend;aabbcc"
's = Splitter(s, "@", "#")
'msgbox s '--> "drama"를 반환합니다.
'###############################################################
Dim vaArr As Variant
On Error GoTo EH:
vaArr = Split(v, Cutter)(1)
If Not IsMissing(Trimmer) Then vaArr = Split(vaArr, Trimmer)(0)
Splitter = vaArr
Exit Function
EH:
Splitter = ""
End Function
활용 예제
HTML 태그 사이의 값 추출하기
= Splitter ( "<div class=""nav"">메뉴</div>", "<div class=""nav"">", "</div>" )
'// '메뉴' 를 반환합니다.
JSON 데이터에서 특정 필드 값 추출하기
= Splitter ( "[ { ""color"":""red"", ""value"":""#f00"" }, { ""color"":""blue"", ""value"":""#00f"" } ]", """color"":", "," )
'// "red" 를 반환합니다.
안내사항
마지막문자의 기본값은 NULL 이므로, 생략하면 시작문자 이후의 모든 문자를 반환합니다.
함수 실행 중 오류가 발생하면 결과값으로 공백("")을 반환합니다.
![[공지] 오빠두에듀 프리랜서 보조 강사 모집](https://www.oppadu.com/wp-content/uploads/2026/08/0822-프리랜서-보조강사-모집.png)
![[직원 채용] 오빠두엑셀이 정규직 동료를 모십니다](https://www.oppadu.com/wp-content/uploads/2026/08/직원-채용-1_R.png)
모두 유용하게 쓰고 있습니다 ㅎ
vaArr = Split(v, Cutter)(1)
이 라인에 문제가 있다고 뜹니다.
네이버 연관검색어 쿼리 결과가 바뀌어서 그렇습니다.
기존 연관검색어의 코드를 아래처럼 수정해보세요.