강좌 / 팁

소프트웨어 엑셀 사용자 정의 함수와 내장 함수 활용

2019.09.13 10:59

지후빠 조회:2401 추천:7

안녕하세요? 추석을 맞이하여 즐거운 시간 보내시고 계신가요? 본가에 안가 시간이 좀 남아서...

 

질문 글에 대해 올린 답글인데요. 재미 있는 주제인 것 같아서 정리해봅니다.
잊고 살던 엑셀 본능?이 깨어나는 것 같아서 잠깐 오버한다는... ^^; (엑셀 초보/중급?을 위한 설명입니다.)

 

질문 글; https://windowsforum.kr/12142002 <- 사용자 정의 함수가 필요한 상황입니다. 사람손으로 하기에는...

 

1. 엑셀 함수란?

- http://erunjoy.com/156

- http://phylab.yonsei.ac.kr/board.php?board=excel&indexorder=2&body_only=y&button_view=n&command=body&no=10

 

2. 엑셀 내장 함수들

- http://www.malgum.com/board/study/board_view.asp?page=1&num=199#

- https://namu.wiki/w/Microsoft%20Excel/%ED%95%A8%EC%88%98%20%EB%AA%A9%EB%A1%9D

 

3. 사용자 정의 함수란?

- https://mainia.tistory.com/1180
- https://kiyoo.tistory.com/207

 

4. 사용자 정의 함수 예 (질문글에 대한 해법이 될 수 있는 한 예제입니다.)

- 엑셀5부터 VBA를 포함하였는데, 크게 나눠보면 매크로와 사용자 정의 함수에서 사용할 수 있습니다.

- 25년 전쯤인데 그때는 간단한 것도 도움말 참고해 가면서 많은 시간을 투자했던 기억이 납니다.^^;

- 지금은 인터넷에 스크립트 소스들이 넘처나서 잘 가공만 하면 쉽게 결과에 도달 할 수 있는 것 같습니다.

 

[답글 엑셀 파일에 대한 설명, 위 질문글 링크를 한번 정독하심이...] -> 추가로 첨부 파일 확인; Word Cluster.zip  

- 폴더 구조; 부모 폴더(예; Word Cluster) 안에 10년 단위로 분류된 폴더가 있고 그 내부에 각 년도가 있고 년도 내부에 특정 월의 폴더들이 있고 그 월 폴더 내부에 텍스트 파일이 수십개 모여 있는 구조 입니다. 년도 까지는 명시이고 하부 월 폴더 부터는 랜덤으로 올 수 있다고 하십니다.

- 첨부 파일은 매크로(사용자 정의 함수)가 들어 있어서 content 포함으로 open 하셔야 합니다.

폴더구조3.jpg

 

- 예제 엑셀 파일 설명; 첨부파일에서는 공개되었던 텍스트 파일만 반복적으로 포함시켜서 결과가 다양하게 나오지는 않습니다.

- 아래는 별도로 제공 받은 샘플 데이터에서 나온 결과들 입니다.

2019-09-12_2.jpg

[A1셀] =LEFT(CELL("filename"),FIND("[",CELL("filename"))-1)

윗윗쪽 스샷의 빨간 네모 상자 안을 보시면 엑셀 파일의 상대 위치를 알 수 있습니다.
사용자 정의 함수에서 이용할 폴더 경로인데, 혹시 이해 안되실까 해서, 해당 폴더에 이 엑셀 파일을 두면 경로를 자동으로 추출할 수 있도록 내장함수를 조합하였습니다. 엑셀 파일을 다른 경로에 두거나, 필요시에는 직접 경로를 입력하시면 됩니다. 예) D:\TEST\

[A2:A50셀] 10년 단위로 년도를 묶는 부모 폴더명을 기입하였습니다.

[B2:B50셀] 각 년도를 기입하였습니다.

[C1:J1셀] 카운팅할 단어 입니다.

 

[C2:J50셀] C2에 사용자 정의 함수를 이용한 식을 만들고 자동 채우기 하였습니다.

[C2셀] =CountInSubFolder($A$1 & $A2 & "\" & $B2,C$1)

사용자 정의 함수 이름은 CountInSubFolder 이고 2개의 인수가 필요합니다. 앞쪽은 년도까지 명시한 전체 폴더 경로, 뒷쪽은 찾을 단어입니다.

앞쪽 전체 경로는 [A1셀] + [A2:A50셀] + [B2:B50셀] 을 조합하여 완성 하였습니다. 결과 예) d:\Word Cluster\1971-1979\1971\

주소 표시에서 $가 붙어 있으면 절대참조로 자동채우기에서 변하지 않습니다. 주소 입력후 F4를 반복하여 누르면 형태의 변화가 반복됩니다.

 

alt + F11 를 눌러 함수를 보면 아래와 같습니다. (짧은 스크립트로 많은 일을 시킬수 있다는...)

VBA Project.jpg

- CountInSubFolder 함수는 지정 폴더의 서브 폴더를 조회, 그안의 파일들의 목록을 얻어, 각 파일에 대해 CountInTextFile 함수를 적용합니다.

- CountInTextFile 함수는 해당 텍스트 파일에서 주어진 문자열이 나타난 횟수를 카운팅하여 결과 값을 돌려 줍니다.

 

5. 제가 이 문제에 대해 접근한 방법은... 구글 검색입니다. ^__^ (VBA 기초는 되어 있어야 하지만...)

- 두가지 키워드로 구글 검색하였습니다. 그 중 참고한 페이지 입니다. 

-> vbs 서브 폴더에서 파일 목록; https://foco85.tistory.com/47

-> vbs word count in text file; https://stackoverflow.com/questions/37895412/search-number-of-times-a-string-occurs-in-text-file

--- 문자열을 카운팅하는 방법은 여러 가지가 있을 것 같은데 질문하신 분은 이정도면 되겠다 하시어 여기서 멈췄습니다.

--- 정확한 카운팅을 위해서는 몇가지 고려해야 할 사항들이 있어서, 수정의 편의를 위해 카운팅 함수는 분리하였습니다.

 

엑셀을 잘 배워 두면 써먹을데가 많은 것 같습니다. 특히 총무, 재무 등 숫자를 많이 다루는 회사원에게는 필수라 할 수 있겠네요.

완벽히 잘할 필요까지는 없을 것 같고(공부 시간 많이 필요...), 구글 신의 도움을 받아 구슬을 꿸수 있을 정도면 좋을 것 같습니다.

 

모든 윈포 회원님들 안전운전 하기고, 과음, 과식은 피하시고 건강하고 후유증 없는 추석되시길 바랍니다. ^^

번호 제목 글쓴이 조회 추천 등록일
[공지] 강좌 작성간 참고해주세요 gooddew - - -
4359 윈 도 우| 없이는 살 수 없는 Windows 바로 가기 키 11개 [5] VᴇɴᴜꜱGɪ 2959 31 07-18
4358 윈 도 우| Windows 11에서 모니터에 적합한 색 프로필을 얻는 방법 [3] VᴇɴᴜꜱGɪ 1493 2 07-17
4357 소프트웨어| 탐색기 컨텍스트 메뉴에 토탈커맨더에서 열기 추가 [15] 지후빠 968 23 07-16
4356 윈 도 우| RunOnce 레지스트리 키(간단 메뉴얼) [3] 過客 922 14 07-16
4355 소프트웨어| GPT 파티션 삭제 및 재구성 / EASEUS Partition Master 16 [9] 무월 1507 29 07-14
4354 소프트웨어| iVentoy 만능윈도우(WIM) 자동 설치 [20] 무월 4241 66 07-08
4353 소프트웨어| iVentoy PXE 부팅 네트워크 OS 설치 [25] 무월 1713 39 07-02
4352 기 타| 배치 파일 %~1 [13] bangul 1609 14 07-02
4351 윈 도 우| Microsoft Edge 브라우저 제거 [23] 무월 2392 36 06-30
4350 모 바 일| 동영상을 원 속에 넣어 합성하는 방법 Mobile PowerDirect... [1] 무림거사 1003 2 06-29
4349 윈 도 우| 윈도우11,10 MS계정 없이 로컬 계정으로 설치하기 [31] 무월 3887 33 06-23
4348 윈 도 우| 윈도 에러 생길때, 모든 이벤트 로그 한꺼번에 보기 [10] zerojiddu 1258 10 06-23
4347 윈 도 우| OneDrive 설치 방지, Microsft Edge 바로가기 생성 방지 [3] 무월 1037 11 06-23
4346 윈 도 우| 윈도우10 & 11 작업표시줄 시계에 요일 나오게 하는 방법! [28] 무월 2376 33 06-21
4345 윈 도 우| 한글 자음 모음 분리 현상 해결 방법 [7] 무월 1312 14 06-21
4344 기 타| 레마클로님 wifi on/off 스크립트 (수정) pnputil 추가 [10] 슈머슈마 888 7 06-20
4343 윈 도 우| 윈도우11 네트워크 인터넷 연결 없이 설치하기 [6] 무월 2308 16 06-20
4342 윈 도 우| 파워쉘로 움직이는 .gif 바로 만들기 [6] zerojiddu 988 10 06-18
4341 기 타| Windows 10 pe 디스플레이 레지스트리 [4] bangul 1527 16 06-13
4340 윈 도 우| Windows 11의 Microsoft 스토어에서 앱 다운로드 중지를 해... VᴇɴᴜꜱGɪ 1079 4 06-13
XE1.11.6 Layout1.4.8