오늘은 전에 올린 것에 대하여 2단계로 분리된 파일을 불러와서 도로명으로 검색하고 그 내용 (총 24가지 항목)를 출력하는 부분입니다. 이렇게 3단 분류를 하니 그런데로 돌아가네요. 그래도 데이터 열기까지 대기시간이 5~10초는 걸리네요..... 우씨 VBA로 데이터를 나누는데 총3일 걸린 듯하네요. 이런 건 수작업하지 마세요... 고단합니다. 하여튼 검색파일과 한 번에 올릴 수 있는 양만큼만 올리겠습니다. 하드에 폴더를 만들 경우 꼭 아래 내용을 참조하여 만드시기 바랍니다.
[샘플 : 다른 지역 자료가 필요하시면 댓글에 이메일 주소를 남겨주시면 보내드리겠습니다. ]
[하기 검색기 파일은 15.02.27일로 수정된 파일입니다]
검색기.xlsm
강릉시.xlsx하기 그림은 초기 작업화면입니다.
하기 그림은 우편검색기를 실행했을 때 초기화면 입니다. 그 구성의 역활은 다음과 같이 파일이 위치한 경로를 지정하는 것입니다.
1 DB위치( 파일의 경로를 폴더까지 지정)---------------------> e:\우편번호 (변경가능)
2 분류(시도) -----------------------------------------> e:\우편번호\강원 (변경불가)
3 분류(시군구)----------------------------------------> e:\우편번호\강원\강릉시.xlsx (변경불가)
하기 그림은 "DB열기" 버튼을 클릭한 후 도로명을 선택하고 검색한 결과 입니다.
하기 그림은 기본 설정 내용입니다.
'엑셀 VBA > 일반' 카테고리의 다른 글
| 엑셀vba를 이용한 자료 정리 예시 (0) | 2016.08.02 |
|---|---|
| 알루미늄 압출시 발생되는 부적합 내용정리 폼 예시 (0) | 2016.07.09 |
| 쇼핑몰관리를 만들며 (0) | 2015.06.06 |
| 누적합구하는 VBA (0) | 2015.05.15 |
| 도로명 주소 우편번호 DB 나누기 (0) | 2015.01.31 |