행별로 데이터를 그룹화 하여 자동 연번 붙인 후 하위 폴더 생성

VBA
작성자
Brian
작성일
2022-11-10 21:35
조회
74
엑셀버전 : 엑셀2013

운영체제 : 윈도우10

질문 요약 : 행별로 데이터를 그룹화 하여 자동 연번 붙인 후 하위 폴더 생성

VBA로 데이터를 읽어서 자동으로 폴더를 만들려고 합니다.

우선 폴더 이름을 만들려고 하는데,

폴더 구조가 최상위(1 Level)-하위(2 Level)-최하위(3 Level) 구조 입니다.

최하위 구조에 엑셀 행 데이터 몇개를 병합하여 폴더를 만들려고 하는데요.

이 폴더 만드는 규칙이 하위(2 Level) 구분에 따라서

  1. 데이터가 1개가 있는 경우가 있고
  2. 데이터가 10개가 되는 경우가 있습니다.

이 경우 하위 폴더안에 1번의 경우는 001. {이름}

2번의 경우 001. {이름}, 002. {이름} , 003. {이름}  ~ , 010. {이름}

으로 만들려면 어떻게 하는게 좋을지 감이 없어서 문의 드려 봅니다.

첨부 양식에 하고자 하는 내용 예시를 작성해 놨습니다.

도와주세여!!!!!!!!!!!!!!

스크랩
공유
전체 10

  • 2022-11-10 22:20

    @Brian 님 안녕하세요.

    유첨파일과 같이 cmd 명령문을 만드신 후,

    Win + S 로 실행 -> cmd 를 입력하여 명령프롬프트 실행 후

    cmd 명령문을 복사 붙여넣기 하면 폴더를 일괄 생성할 수 있습니다.

    VBA를 사용할 경우 mkdir 함수를 사용해보세요.

    https://learn.microsoft.com/en-us/office/vba/language/reference/user-interface-help/mkdir-statement

    제시해드린 답변이 문제 해결에 도움이 되었길 바랍니다. 감사합니다.

    첨부파일 : 자동-연번-생성-후-폴더-만들기.xlsx


    • 2022-11-10 22:29

      @오빠두엑셀 님 앗 갑사합니다!

      근데 제가 지금 어줍잖게 VBA로 이걸 만들어보고 있는데

      말씀해주신 카운트를 자동으로 만들어보려고 하거든요.

      이전 단계까지는 어떻게든 왔는데... 이 이후에 좀 맨붕이라... ㅠㅠ

      알려주신 해답에서 혹시 count를 vba로 구현할 방법은 없을까요?

       

      폴더 생성은 알려주신 mkdir 함수 찾아보겠습니다.


      • 2022-11-11 16:10

        @Brian 님 안녕하세요.

        COUNTIF 를 VBA로 직접 구현하려면 FOR문에 대한 기초 지식이 있어야 합니다.

        관련해서는 VBA 4주 완성 멤버쉽 강의를 참고해보시고, VBA 코드 샘플은 아래 링크를 참고해보세요

        https://www.bluepecantraining.com/countif-sumif-on-colour-using-vba-custom-function/

        만약 엑셀 함수로 직접 구현해도 괜찮으시다면,

        Application.WorksheetFunction.CountIf(...)

        를 사용하셔도 엑셀 함수와 동일한 결과를 얻으실 수 있습니다.^^

         


  • 2022-11-12 15:20

    @Brian 님 Brian님의 파일을 매크로 파일로 변환하여 보았습니다.

    시트 이름은 Sheet1 --> List로 변경하였으니 시트 이름을 변경하지 마십시오.

    매크로 버튼이 2개 있습니다:  [폴더 생성], [서브폴더 및 폴더 내 파일삭제]

    첨부 사진들을 순서대로 보시고 실행해 보시기 바랍니다.

    서브-폴더-및-각-폴더-낸-파일삭제.jpg

    첨부파일 : 자동-연번-생성-후-폴더-만들기.xlsm


  • 2022-11-12 15:28

    @Brian 님 Image 파일을 6개 올렸는데 마지막 것만 올라가 각각 올립니다.

    Step1. 폴더 생성 및 매크로 파일 저장

    임의의 폴더 생성 후 매크로 파일을 해당 폴더에 저장하세요.

    Step1.-폴더-생성-및-매크로-파일-저장.JPG


  • 2022-11-12 15:29

    @Brian 님 Step2. 매크로 시작 화면

     

    Step2.-매크로-시작-화면.JPG


  • 2022-11-12 15:29

    @Brian 님 Step3. [폴더 생성] 버튼 클릭 click

    Step3.-폴더-생성-버튼-클릭-click.JPG


  • 2022-11-12 15:30

    @Brian 님 Step4. 작업 완료

    Step4.-작업-완료.JPG


  • 2022-11-12 15:31

    @Brian 님 Step5. 파일 관리자 화면 - 신규 생성된 서브 폴더 확인용

    Step5.-파일-관리자-화면-신규-생성된-서브-폴더-확인용.JPG


  • 2022-11-12 15:36

    @Brian 님 서브 폴더 및 각 폴더 내 파일삭제

    ** 주의** 이 작업은 본 매크로파일[자동-연번-생성-후-폴더-만들기.xlsm]이 있는 폴더가 아닌 곳에서는

    절대 사용하지 마세요. 서브 폴더와 파일들이 삭제됩니다.

    서브-폴더-및-각-폴더-내-파일삭제.jpg


전체 8,579
번호 카테고리 제목 작성자 작성일 추천 조회
알림
🎉 오피스 분야 30주 연속 1위! - 「 진짜쓰는 실무엑셀 」 전자책이 출간되었습니다! (35)
오빠두엑셀 | 2022.09.28 | 추천 9 | 조회 2854
오빠두엑셀 2022.09.28 9 2854
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (109)
오빠두엑셀 | 2021.10.28 | 추천 136 | 조회 8593
오빠두엑셀 2021.10.28 136 8593
45149 함수/공식
New 셀비교 해서 유사 단어가 있으면 해당 단어 출력 엑셀파일 (1)
엑셀잘하고싶어요 | 16:46 | 추천 0 | 조회 20
엑셀잘하고싶어요 16:46 - 20
45143 VBA
New 드롭다운 목록설정한값이랑 실제 보여지는값이랑 달라지게 보이고싶어요 엑셀파일첨부파일
짱구는옷말려 | 13:41 | 추천 0 | 조회 26
짱구는옷말려 13:41 - 26
45139 함수/공식
New 엑셀 빨간색 글자만 삭제하는 방법있을까요? (4) 답변완료
오빵두 | 11:21 | 추천 0 | 조회 37
오빵두 11:21 - 37
45138 VBA
New 한셀에 기업이름, 전화번호, 이메일등이 기록되어 있는데요. 그중에 이메일만 추출해서 다른 셀에 넣을수 있을까요? (1)
Surf | 11:07 | 추천 0 | 조회 41
Surf 11:07 - 41
45137 함수/공식
New SUMIFS 함수 문의 드립니다. 첨부파일
논두렁 | 11:04 | 추천 0 | 조회 29
논두렁 11:04 - 29
45134 피벗테이블
New 피벗테이블의 날짜를 나타내는 첨부파일
조지아 칸타타 | 10:41 | 추천 0 | 조회 27
조지아 칸타타 10:41 - 27
45132 함수/공식
New 행과 열에 맞는 값을 불러오고 싶어요 엑셀파일첨부파일 (1)
? | 10:11 | 추천 0 | 조회 35
? 10:11 - 35
45129 기능/도구
New 엑셀 검토 변경내용표시 엑셀파일
포에버하윤둥이 | 09:43 | 추천 0 | 조회 18
포에버하윤둥이 09:43 - 18
45126 차트/그래프
New 콤보차트 보조축 숨기기? 가능한가요? 첨부파일
탕수육육 | 08:31 | 추천 0 | 조회 23
탕수육육 08:31 - 23
45118 구글시트
New FILTER, QUERY, LOOKUP 함수 질문 첨부파일 (1)
🌸 | 00:17 | 추천 0 | 조회 41
🌸 00:17 - 41
45106 함수/공식
New 다른시트 목록에 있는 이름을 병합셀에 일정하게 불러오는 방법이 알고싶습니다. 첨부파일 (2)
hoon | 2022.12.01 | 추천 0 | 조회 43
hoon 2022.12.01 - 43
45103 VBA
New [VBA] 여러 폴더 경로의 엑셀 내용 수정 첨부파일 (4) 답변완료
엑셀잘하고싶어요 | 2022.12.01 | 추천 0 | 조회 44
엑셀잘하고싶어요 2022.12.01 - 44
45101 VBA
New VBA로 특정 셀부터 해당 셀 가장 마지막 셀까지 합계 구하기.(범위설정?) 첨부파일 (4) 답변완료
탕수육육 | 2022.12.01 | 추천 0 | 조회 49
탕수육육 2022.12.01 - 49
45094 VBA
New VBA로 다중조건 합계 구하기 엑셀파일 (1)
고바마 | 2022.12.01 | 추천 0 | 조회 46
고바마 2022.12.01 - 46
45093 함수/공식
New 텍스트인식 날짜를 월만 추출 하고싶어요 첨부파일 (2)
짱구는옷말려 | 2022.12.01 | 추천 0 | 조회 39
짱구는옷말려 2022.12.01 - 39
45089 함수/공식
New 특정값과 일치할때 해당 항목 불러오기.... 엑셀파일 (3) 답변완료
김태성 | 2022.12.01 | 추천 0 | 조회 58
김태성 2022.12.01 - 58
45088 함수/공식
New xlookup 함수 질문이요 첨부파일 (1)
갈대님 | 2022.12.01 | 추천 0 | 조회 42
갈대님 2022.12.01 - 42
45084 VBA
New VBA 메크로 기록 Range 질문입니다. (3) 답변완료
탕수육육 | 2022.12.01 | 추천 0 | 조회 42
탕수육육 2022.12.01 - 42
45077 함수/공식
New 음수 일련코드 시간으로 변경 어떻게 할까요? 첨부파일 (2)
힙합매냐 | 2022.12.01 | 추천 0 | 조회 28
힙합매냐 2022.12.01 - 28
45074 VBA
New 엑셀 시트 복사 이름 변경 및 변수 추가 엑셀파일첨부파일 (2) 답변완료
선크 | 2022.12.01 | 추천 0 | 조회 46
선크 2022.12.01 - 46
45073 함수/공식
New 초단위 합계 첨부파일 (1) 답변완료
BBB | 2022.11.30 | 추천 0 | 조회 34
BBB 2022.11.30 - 34
45072 함수/공식
New 조건부 서식에서 >0 이 무엇인가요? (1)
return**** | 2022.11.30 | 추천 0 | 조회 40
return**** 2022.11.30 - 40
45070 함수/공식
New 시간대별 생산계획 자동화 함수 및 수식 엑셀파일첨부파일 (2)
Carnelian | 2022.11.30 | 추천 0 | 조회 36
Carnelian 2022.11.30 - 36
45069 함수/공식
New 범위내에서 문자열셀 날짜셀 카운트하는 함수 엑셀파일 (1)
엑셀고수를향해 | 2022.11.30 | 추천 0 | 조회 26
엑셀고수를향해 2022.11.30 - 26
45064 VBA
New 일정시간 온도기록 반복 작업 VBA 엑셀파일첨부파일
워싱턴 | 2022.11.30 | 추천 0 | 조회 43
워싱턴 2022.11.30 - 43
45062 함수/공식
New 중복제외하면서 순서대로 값 가져오기 첨부파일 (1)
노갈 | 2022.11.30 | 추천 0 | 조회 37
노갈 2022.11.30 - 37
45056 VBA
New 서로 다른 시트에서 소속과 성명이 같은 사람 중 날짜가 동일한 셀을 찾아 색채우기 vba 엑셀파일첨부파일 (2) 답변완료
007 | 2022.11.30 | 추천 0 | 조회 45
007 2022.11.30 - 45
45055 차트/그래프
New 차트 데이터 레이블 서식을 변경해도 자꾸 바뀝니다 첨부파일 (3)
에그로봇 | 2022.11.30 | 추천 0 | 조회 22
에그로봇 2022.11.30 - 22
45053 파워쿼리/피벗
New 파워쿼리 데이터 연결오류 첨부파일 (2) 답변완료
푸딩씨 | 2022.11.30 | 추천 0 | 조회 27
푸딩씨 2022.11.30 - 27
45051 차트/그래프
New 피벗 차트에서 누적막대그래프 사용할 때 총합계 수량을 차트에 띄울 수 없나요? 첨부파일 (1) 답변완료
에그로봇 | 2022.11.30 | 추천 0 | 조회 26
에그로봇 2022.11.30 - 26