300x250
만약 날짜를 년 월 일로 분리하고 싶다거나,
전체 주소의 동, 아파트, 라인, 호 등으로 분리하고 싶을 때 유용한 방법이다.
코드는 아래와 같다.
----------------------------------------------------------------------------------------------------------------
Sub 데이터분리하기()
Cells(3, 3).Value = Mid(Cells(3, 2), 1, 5) '앞 5개
Cells(3, 4).Value = Mid(Cells(3, 2), 6, 5) '중간 5개
Cells(3, 5).Value = Mid(Cells(3, 2), 11, 5) '뒤 5개
End Sub
----------------------------------------------------------------------------------------------------------------
위의 코드는 원본 데이터를 5개씩 나누는 코드다.
Mid 함수
Mid(원본데이터, 데이터 자르기 시작부분, 시작부분으로 부터 몇개 가져올지)
Mid(Cells(3, 2), 1, 5) 는
3행 2열의 데이터를 1번째 자리부터 5개 가져오겠다는 의미이다.
이 코드를 사용하기 위해서 아래와 같이 예제 파일을 만들었다.
코드 실행결과는 아래와 같다.
끝
300x250
'엑셀 > VBA' 카테고리의 다른 글
엑셀 VBA - SHEET 추가하기/ 새로운 SHEET 추가 (0) | 2020.11.02 |
---|---|
엑셀 VBA - 한글쓰기 (0) | 2020.11.02 |
엑셀 VBA - 행추가하기/열추가하기/행지우기/열지우기 (0) | 2020.11.01 |
엑셀 VBA - 셀 색 확인하기/셀 색 값 확인하기/색의 값 (1) | 2020.11.01 |
엑셀 VBA - 셀 색칠하기/color index/셀 색 채우기 (2) | 2020.11.01 |