
개인적으로 만들어 사용하는 엑셀 추가기능입니다. 2008년부터 만들기 시작해서 지금까지 조금씩 수정하고 있습니다.
부족한 자료지만 올려봅니다.^^;;
예전부터 네이버 카페나 다른 커뮤니티에는 공유 했는데.. 클리앙에도 공유해 봅니다.
파이썬이 대세(?)인 시대인데.. 전 아직도 엑셀과 VBA가 편하네요
주요기능은 아래에 설명하였습니다.
추천하는 설치 위치는"C:\Users\사용자이름\AppData\Roaming\Microsoft\AddIns" 폴더입니다.
폴더 찾기 귀찮으면 다른곳에 하셔도 됩니다...
위의 폴더 찾는 가장 빠른 방법은 "윈도우키+R"을 누르면 나오는 실행창에 %AppData% 라고 입력하고
엔터키를 치면 탐색기가 실행되면서 "C:\Users\사용자이름\AppData\Roaming"폴더가 열립니다.
탐색기에서 Microsoft폴더 클릭하고 AddIns 폴더 클릭하여 "AddIns"폴더 에 다운르도한 "승승아빠.xlam"을
붙여넣기하면 됩니다.
그리고 행 추가 단축키가 CTRL+ENTER 였는데 기존 사용자분들께서 배열 사용에 불편하다는 민원이 살짝(?) 있어서 행 추가 단축키는 Shift +Enter 로 변경되었습니다.
윈도우10의 보안정책 때문에 설치된 리본메뉴가 비활성화 되기도하는데 이를 방지하기 위하여
이때는 탐색기에서 "C:\Users\사용자이름\AppData\Roaming\Microsoft\AddIns" 폴더 혹은 본인이
승승아빠.xlam파일을 복사해둔 폴더로 이동해서 이동하여 승승아빠.xlam파일의 속성을 클릭 하여
하단의 보안 부분의 차단해제를 체크하고 확인 적용해 버튼 클릭하시면 해결됩니다..

그래도 비활성화 되시는 분들을 아래줄을 클릭하여 비활성화 문제 해결 방법을 확인하시기 바랍니다.
<엑셀 추가기능 비활성화 문제 해결 방법 : https://blog.naver.com/gogoyuijin/222240239479>
설치방법
1. 다운로드한 파일을 "C:\Users\사용자이름\AppData\Roaming\Microsoft\AddIns" 에 붙여 넣기
2. 엑셀 실행
3. 파일메뉴 --> 옵션 --> 추가기능 --> 하단의 이동버튼 --> 추가기능 창에서 찾아보기 -->
"C:\Users\사용자이름\Roaming\Microsoft\AddIns" 폴더 혹은 본인이 "승승아빠.xlam"파일을 선택

참조사항 : VBA로 작성된 기능이기 때문에 추가기능에서 VBA로 실행 되는 기능은 Ctrl-Z로 Undo가 실행되지 않습니다.
| □ 승승아빠 추가기능 그룹 설명 | ||
| no | 그룹명 | 기능 |
| 1 | 파일 | 새문서 / 저장 / 열기 / 다른이름 / PDF 저장 / CSV 저장 |
| 2 | 인쇄 | 인쇄영역 / 미리보기 / 인쇄 간편설정(머릿글, 바닥글, 인쇄제목) / 세로 인쇄로 설정 / 가로 인쇄로 설정 |
| 3 | 보기 | 틀고정 / 기본 / 페이지 나누기 미리보기 |
| 4 | 글꼴 | 폰트 크기 색깔 등등 |
| 5 | 맞춤 | 셀의 상중하 / 셀의 좌 중 우/ 셀 병합(무손실) / 셀병합(상하병합) / 셀 분할 |
| 6 | 셀라인 및 셀(도형) 색상 |
셀 색상 / 셀 테두리 라인 / 행 열 높이 자동 조절 |
| 7 | 데이터 | 정렬 / 필터 / 유효성 / 이름관리 / 중복 찾기(단일영역 또는 복수 영역) / 중복 제거 파워쿼리 / 채우기(위 셀의 값으로 아래 셀 채우기 : 아래 셀에 값이 없는 경우만) |
| 8 | 데이터 통합 | 파일 통합 / 시트 통합 / 자료 통합 |
| 9 | 수식 | 합계 / 피벗테이블 및 차트 / 부분합 |
| 10 | 삽입 | 도형 / 차트 / 날짜(날짜 및 달력시트 만들기)입력 / 텍스트 / 그림 / 기호 |
| 11 | 셀/행/시트 | 삽입(행, 열, 시트, 머리글 기호) / 삭제(행, 열, 시트) / 서식 |
| 12 | 스타일 | 조건부 서식 / 표서서기 / 셀 서식 |
| 13 | 워크북 | 쉽게 읽기 / 창 전환 / 시트 전환 / 단축키 안내 / 함수 소개 / 시트 목차 만들기(현재 파일의 시트이름을 모아 목차 시트 및 시트 바로가기) |
| □ 승승아빠 추가기능 팝업메뉴 | ||
| no | 그룹명 | 기능 |
| 1 | 틀 고정 | 다들 아는 틀 고정 기능 |
| 2 | 날짜 입력 | 1. 선택 한 셀 또는 범위에 날짜입력 2. 년 달력 시트 생성 3. 월 달력 시트 생성 |
| 3 | 글머리 기호 | 선택한 셀 또는 범위에 글머리 기호 입력 - 글머리 기호 종류 : 숫자, 기호, 로마숫자 |
| 4 | 셀 색상 / 테두리 / 표시형식 / 참조방식 |
선택 셀의 색상, 테두리, 표시형식, 참조방식 변경 |
| 5 | 행과 열 추가 / 삭제 | 행과 열 1개 또는 N개 추가 |
| 6 | 시트 추가 및 삭제 | 새 시트 추가(1개 또는 N개) |
| 7 | 시트 이동 및 정렬 | 시트 이동 및 정렬 |
| 8 | 시트 숨기기 및 보호 | 시트 숨기기 및 보호(전체시트 또는 현재시트 선택) |
| 9 | 인쇄 용지 설정 | 인쇄 용지 방향설정(가로 또는 세로 / 현재시트 또는 전체시트) |
| 10 | 선택 영역을 이미지로 저장 | 선택한 셀 범위만 이미지 파일로 저장 |
| 11 | 현재 시트 추출 새파일 생성 | 현재 시트만 추출하여 새로운 파일 생성 |
| □ 승승아빠 추가기능 함수 | ||
| no | 함수명 | 기능설명 |
| 1 | 재직기간 | 입사일과 퇴사일(또는 기준일)을 지정하면 재직기간(근속기각)을 계산 |
| 2 | 재직개월 | 입사일과 퇴사일(또는 기준일)을 지정하면 재직 개월 수를 계산 |
| 3 | 퇴직년월직원 | 60세 정년을 기준으로 하여 퇴직 년월일 계산 |
| 4 | 날짜 관련 함수 (myyear, mymonth, mydate, age, 나이, kage, 한국나이) |
날짜에서 년, 월, 일, 만나이, 한국나이 계산 |
| 5 | 주민번호 관련 함수 (gender, 성별, age, 만나이, kage, 한국나이, 주민암호, juminc) |
주민번호에서 성별, 나이 계산, 주민번호 뒷자리 암호화 |
| 6 | CountColor | 지정된 셀의 색깔에 해당하는 셀의 개수를 산출 |
| 7 | CountColorFont | 지정된 폰트의 색깔에 해당하는 셀의 개수를 산출 |
| 8 | SumColor | 지정된 셀의 색상과 동일한 색상의 셀의 합계 산출 |
| 9 | SumColorFont | 지정된 셀의 폰트 색상과 동일한 색상의 셀의 합계 산출 |
| 10 | SumJumpCols | 선택 범위에서 N개의 열 다음 열의 합계 산출(1번째 열을 포함하여 계산) |
| 11 | SumJumpRows | 선택 범위에서 N개의 행 다음 행의 합계 산출(1번재 행을 포함하여 계산) |
| 12 | SumNthCols | 선택 범위에서 N번째 열의 값들의 합계 산출(1번째 열을 포함하지 않고 계산) |
| 13 | SumNthRows | 선택 범위에서 N번째 행의 값들의 합계 산출(1번째 행을 포함하지 않고 계산) |
| 14 | xvlookup | 오피스365버전에서 제공하는 XLOOUP함수와 동일(?) 기능 제공함수 찾는 값의 왼쪽 열의 값도 반환 |
| 15 | vlookupmv | vlookup함수의 경우 하나의 값만을 반환하는데 vlookupmv함수는 해당하는 값이 복수로 존재하는 경우 복수의 결과 값을 반환 |
| 16 | 숫자 추출함수 (GetNumber, 숫자만) |
셀 값에서 숫자 값만 추출하는 함수 |
| 17 | 문자 추출함수 (GetTXT, 글자만) |
셀 값에서 텍스트만 추출하는 함수 |
| 18 | 숫자 변환 함수 -아리비아 숫자 to 한글숫자 (NumToHan, 한글로, 통화, KRW, HanToNum, 숫자로) |
아라비아 숫자를 한글 숫자로 변환 / 한글 숫자를 아라비아 숫자로 변환 |
엑셀로 비베 사용할수 있는건 알고 있었는데 이렇게 애드온도 가능한지는 몰랐네요.
룩업??
감사합니다. ^^
오늘부터 형님으로 모시겠습니다.
액셀에서 표 하단에
" 2021년07월09일 기준 "
이라고 표시를 하고 싶은데 이때 날짜는 항상 오늘(현재일)입니다.
=TODAY() & "기준"
그런데 이렇게 해보니까 날짜가 요렇게 숫자로 나오네요. -> 44386기준
할수없이 & "기준" 를 빼고 =TODAY() 만 입력해서 2021년07월09일 이라고만 나오게 했는데 뭐가 문제일까요?
아니면 날짜서식 표현을 사용자지정하셔서 yyyy년 mm월 dd일 기준 으로 넣으시면 될 것 같습니다.
=today() 로만 입력해 놓고 사용자지정에서
yyyy"년" m"월" d"일" " 기준"
라고 해 주니까 되네요.... 감사합니다.
=TEXT(TODAY(),"yyyy년 mm월 dd일 기준")
별명은요님 설명이 맞습니다.
Today()함수의 결과(리턴값)는 엑셀 내부에서 사용하는, 날짜의 일련값(기준점으로부터 며칠인지)이라서, 44386 이렇게 나옵니다.(44386번째 날짜라는 의미죠)
이를 TEXT함수(엑셀자체함수이고, VBA로 사용하려면 FORMAT함수입니다)로 특정양식을 지정해서 변환하는 거죠...
TEXT함수 사용할 줄 아시면, 본 값말고 다양한 형태로 표현하시기 훨씬 수월하실 겁니다.
감사합니다
저 같은 경우(office 2016)에는 말씀해주신데로 했는데 활성화가 안되서
그림과 같이 추가작업을 했더니 활성화가 되네요 ^^
추천을 여러개 드리고 싶습니다~!! 아쉽습니다.
추가기능에 넣었습니다.
매년 초에 공유하고 1년 동안 기능 추가/삭제/수정을 반복하고
다시 년초에 공유하는데..
내년 초에 다시 한번 공유하겠습니다.
다시 한번 추천 감사드립니다.
셀에 입혀진 셀의 색상 값과 폰트의 색상 값을 기준으로 개수, 평균, 합계를 구하기 때문입니다.
조건부 서석을 적용하면 셀에 보여지는 색상 값과 폰트의 색상 값을 인지하지 못합니다.
VBA로 코딩한 함수나 기능은 Ctrl-Z로 Undo가 안 먹습니다...주의해서 사용하세요...
수행한 기능이 전부 Ctrl-Z로 Undo가 안되는건 아니고
VBA로 수행 되는 기능이
Undo 되지 않는 것이니 소개 글에 추가하겠습니다.
자료실 보시면 2023년 공개버전 있습니다
그걸루 사용하시기 바랍니다
아.. 엑셀 버전에 크게 상관 관계는 없는데..
하긴 저도 2016에서는 테스트 해보진 않았네요..
2023년 공개판 설치 해 보시고 이상하시면 그냥 다시 이 파일로 파일만 덮어쓰시면 됩니다