(VBA) 문자열 자르기 (Right,Left,Mid)

문자열중에 필요한 문자만 자르는 함수 입니다

 

예를 들어 아래 주소에서

첫번째는 "부산광역시"

두번째는 "영도구"

세번째는 "티스토리아파트"

 

이렇게 자를 수 있습니다

---

첫번째로 "부산광역시"

Left(   [대상 문자열],    [찾을 문자수]   )

Left("부산광역시 영도구 티스토리아파트", 5)

간단하게 왼쪽 첫번위치부터 5개의 문자를 자릅니다

---

두번째로 "영도구"

Mid(   [대상 문자열],    [시작 위치],   [찾을 문자수]   )

Mid("부산광역시 영도구 티스토리아파트", 7, 3)

Mid()는 위치를 설정해야 합니다

"영도구" 시작 위치는 7이고 찾을 문자수는 3개
이러면 "영도구"만 자를 수 있습니다

---

세번째로 "티스토리아파트"

Right(   [대상 문자열],   [찾을 문자수]   )

Right("부산광역시 영도구 티스토리아파트", 7)

Left()랑 반대라고 생각하시면 됩니다

마지막 위치부터 7개의 문자를 자릅니다

---

위 내용을 전체적으로 보면

Sub Test()

    Dim strAddress As String '주소

    strAddress = "부산광역시 영도구 티스토리아파트"
    
    Debug.Print Left(strAddress, 5) '부산광역시
    
    Debug.Print Mid(strAddress, 7, 3) '영도구
    
    Debug.Print Right(strAddress, 7) '티스토리아파트
    
End Sub

"F5" 눌러서 실행해서 결과를 확인해보세요

결과