성적서 자동화 관련하여 질문좀 드리려 합니다.

VBA
작성자
이준우
작성일
2022-11-12 12:41
조회
104
엑셀버전 : 엑셀2016

운영체제 : 윈도우10

질문 요약 : 성적서를 한번에 수백장을 뽑아내야하는 상황 발생
하여 최소단위인 32개를 한번에 만들고 싶은데 하나를 저장하는데까지는 어찌저찌 만들고 있으나 이걸 연속으로 32번을 반복하는것에 대한 질문

현재 성적서를 한번에 수백장을 뽑아내야할 상황에 처한 불쌍한 중생입니다.
그동안은 그냥 메크로 기록으로 대충 모방하면서 해왔는데

SHEET1 K8:O28 데이터를 SHEET2 H17:L37으로 옮기고
SHEET1 K29:O58 데이터를 SHEET3 H8:L37 이런식으로 옮긴다음
SHEET2,3을 새파일로 빼서 SHEET K4/P4/U4...에 기록해둔 이름으로 저장해야 합니다

이걸  A10/D10/G10... 이런식으로 열에 관한 변수만 바꿔가며 복사 붙여넣기 후 저장을 32번 반복해야하는데
이 열에관한 변수를 어떻게 루프를 돌릴지 머리가 안돌아갑니다.

그동안은 그냥 메크로 기록키고 대충 제가 필요한 부분만 눈치코치로 고쳐가며 썼는데 이건 제대로 못배운 머리로 들이박으려니까 골통만 쪼개지네요..

스크랩
공유
회원등급 : 3레벨
포인트 : 96 EP
총질문 : 2 개 (마감율 : 50%)
채택답변 : 0 개
전체 4

  • 2022-11-13 16:18

    @이준우 님 첨부파일과 사진을 보시고 작업해 보세요.

    선택된 (전부 또는 임의 선택 가능) 보고서 번호별로 Workbook(.xlsx)가 저장됩니다.

    저장 폴더는 작성일 기준 YYYYMMDD로 8자리가 자동 생성됩니다.

    개별 Workbook애 6개의 보고서가 있으니 print preview로 확인하세요.

    성적서-44326-manual.JPG

    첨부파일 : 성적서.xlsm


    • 2022-11-13 16:35

      @김재규 님 와.... 겁나게 빠르시네...
      이게 전문가의 솜씨군요...
      그런데 시트를 하나로 합치는게 아니라 시트 분할해놓은거까지 완벽하게 똑같이 원래양식 그대로 가져가야 하는데 하나로 합쳐졌네요..
      제목을 바꿔봐도 고정된 양식으로 나가고
      이게 고객사 양식이라 파일이름부터 시트하나,셀하나까지  제맘대로 바꾸면 안되서 이거 연구해서 다시 만들어봐야겠습니다
      에궁..

      이런쪽으로 괜찮은 도서 아는거 있으시면 추천좀 부탁드리겠습니다.
      이번에는 당장 발등에 불떨어져서 발만 동동 구르고 있었는데 담부터는 제가 해야할거같아서요.


  • 2022-11-13 01:25

    @이준우 님 올려주신 내용의 데이터를 확인해보니 첫번째 Report의 데이터의 행수는 21개이고 나머지는 30개이던데 이부분은 변함이 없는건지요?


    • 2022-11-13 16:10

      @Taeeseom Cho 님 이게 첫번째 시트가 데이터고, 두번째 시트부터 데이터를 입력해서 inspection report 6번까지 데이터를 입력 후 1번시트를 뺀 나머지 시트들을 다른엑셀파일로 저장해야 합니다(시트제목까지요. 해서 내용만 복사하면 안되기에 시트째로 복사할얘정). 제목은 제가 위에 sheet 1에 4행부분에 적어놓은 대로 저장되어야 하구요.
      복사하고 저장까지는 어떻게든 해보겠는데 이걸 5행씩 옮겨가며 복사해야합니다.
      데이터는 1번 리포트시트의 경우 제품명 등 기타데이터를 넣은 자리를 할애해서  5*21, 나머지는 5*30인데  6번리포트 시트는 시트양식만 30행이고 실제로 복사될 데이터는 한개열밖에 없습니다.

       

      이런거 참고할만한 도서도 추천해주실거 있으시면 추천해주시면 감사드리겠습니다.
      기왕이면 예제많고, 이 예제가 어떻게 작동하고있는건지 설명해주는거 위주로요.


전체 8,636
번호 카테고리 제목 작성자 작성일 추천 조회
알림
🎉 오피스 분야 30주 연속 1위! - 「 진짜쓰는 실무엑셀 」 전자책이 출간되었습니다! (37)
오빠두엑셀 | 2022.09.28 | 추천 9 | 조회 3080
오빠두엑셀 2022.09.28 9 3080
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (110)
오빠두엑셀 | 2021.10.28 | 추천 136 | 조회 8761
오빠두엑셀 2021.10.28 136 8761
45329 함수/공식
New 첨부 파일처럼 특정 조건에 해당하면 색을 입혀주고 싶은데요. 가능할까요? 엑셀파일
프리한하루 | 12:30 | 추천 0 | 조회 7
프리한하루 12:30 - 7
45328 VBA
New 조건에 따른 특정 셀만 계산하는 법이 있을까요? (1)
Jes | 12:17 | 추천 0 | 조회 8
Jes 12:17 - 8
45325 VBA
New VBA 관련 질문드립니다! 엑셀파일
장현준 | 11:35 | 추천 0 | 조회 9
장현준 11:35 - 9
45324 함수/공식
New 거래처별로 넘버에 숫자가 있으면 카운팅되도록 가능할까요? 첨부파일 (1)
karism**** | 11:33 | 추천 0 | 조회 7
karism**** 11:33 - 7
45322 함수/공식
New 엑셀에서 함수로 표를 가져올때, 배열(위치)도 변경 가능할까요..? 엑셀파일첨부파일 (1)
정지훈 | 10:57 | 추천 0 | 조회 10
정지훈 10:57 - 10
45321 차트/그래프
New 엑셀 DB자료를 차트(가로 막대줄) 로 바꾸고싶은데 문의드립니다 ㅠㅠ 엑셀파일첨부파일
정지훈 | 10:47 | 추천 0 | 조회 12
정지훈 10:47 - 12
45316 기능/도구
New XIMAGE 추가기능이 제 엑셀기능을 제한하고 있습니다. 도저히 해결이 안되네요 도와주세요
베이보이 | 06:32 | 추천 0 | 조회 12
베이보이 06:32 - 12
45313 함수/공식
New 엑셀 순위표 관련 질문.. 엑셀파일첨부파일
조긍 | 00:34 | 추천 0 | 조회 29
조긍 00:34 - 29
45305 함수/공식
New 예상매출을 어떤식으로 접근하면 좋을까요? 첨부파일 (4) 답변완료
karism**** | 2022.12.06 | 추천 0 | 조회 53
karism**** 2022.12.06 - 53
45304 함수/공식
New 필터 적용 후 필터 값에 맞게 원하는 데이터를 구할 수 있는 함수 질문 엑셀파일
juyoun**** | 2022.12.06 | 추천 0 | 조회 23
juyoun**** 2022.12.06 - 23
45299 함수/공식
New 조건부서식 색상 표시 조건 중, 참 거짓 판별 조건 설정 궁금해요! 첨부파일 (6) 답변완료
고식이 | 2022.12.06 | 추천 0 | 조회 33
고식이 2022.12.06 - 33
45298 함수/공식
New 숫자와 텍스트에서 일부 숫자 추출, 가공하기 엑셀파일
포에버하윤둥이 | 2022.12.06 | 추천 0 | 조회 37
포에버하윤둥이 2022.12.06 - 37
45295 함수/공식
New DUTOOL 중에 kakaoAdress 관련 문의입니다. 첨부파일 (1)
갠듬갸 | 2022.12.06 | 추천 0 | 조회 19
갠듬갸 2022.12.06 - 19
45294 함수/공식
New 기간 내 해당하는 셀에 배경색을 칠하는 조건부서식... 방법이 없을까요? 엑셀파일첨부파일 (4) 답변완료
질문물음표 | 2022.12.06 | 추천 0 | 조회 36
질문물음표 2022.12.06 - 36
45289 함수/공식
New 이게 왜 되는지 설명해주세요! 엑셀파일 (3) 답변완료
뉴비 신입사원 | 2022.12.06 | 추천 0 | 조회 61
뉴비 신입사원 2022.12.06 - 61
45284 VBA
New 출력물 PDF로 저장방법(사본 때문에 질의드립니다)
참치원양어선 | 2022.12.06 | 추천 0 | 조회 30
참치원양어선 2022.12.06 - 30
45283 함수/공식
New "2022/01/01 오전 08:12:20" 시간만 추출 하고 싶습니다. 엑셀파일첨부파일 (2) 답변완료
유란뽕 | 2022.12.06 | 추천 0 | 조회 34
유란뽕 2022.12.06 - 34
45278 함수/공식
New 다중조건 조건부서식 여쭈어봅니다. 엑셀파일 (1) 답변완료
김태성 | 2022.12.06 | 추천 0 | 조회 28
김태성 2022.12.06 - 28
45277 함수/공식
New 첨부파일에 있는 것처럼 숫자만 추출해서 표시하고 싶은데요. 엑셀파일 (4) 답변완료
프리한하루 | 2022.12.06 | 추천 0 | 조회 38
프리한하루 2022.12.06 - 38
45270 VBA
New vba 특정조건에따라 가동 안되게 가능한가요? (1)
gkawoa**** | 2022.12.06 | 추천 0 | 조회 24
gkawoa**** 2022.12.06 - 24
45269 문서서식
New 셀서식 사용자지정 (2) 답변완료
애기천하 | 2022.12.06 | 추천 0 | 조회 30
애기천하 2022.12.06 - 30
45263 함수/공식
New 텍스트내에 텍스트 변경 엑셀파일 (2)
엑셀공부중 | 2022.12.05 | 추천 0 | 조회 46
엑셀공부중 2022.12.05 - 46
45262 함수/공식
New 행렬변환 질문 엑셀파일첨부파일 (4)
덕화 | 2022.12.05 | 추천 0 | 조회 36
덕화 2022.12.05 - 36
45259 함수/공식
New 중복값 순서대로 랭킹 입력하는 방법 첨부파일 (3)
tndka**** | 2022.12.05 | 추천 0 | 조회 49
tndka**** 2022.12.05 - 49
45258 기능/도구
New 빈칸선택 (2)
버섭서버 | 2022.12.05 | 추천 0 | 조회 40
버섭서버 2022.12.05 - 40
45256 함수/공식
New 다수 열에 특정 값 합계 내는 법이 있을까요? (2)
MAXM | 2022.12.05 | 추천 0 | 조회 50
MAXM 2022.12.05 - 50
45255 함수/공식
New 특정 단어 입력시 다른시트에 해당 행 내용 표기법 (3)
자유 | 2022.12.05 | 추천 0 | 조회 43
자유 2022.12.05 - 43
45251 함수/공식
New 파일명에 맞춘 이미지 삽입 매크로 (1)
jinyoung**** | 2022.12.05 | 추천 0 | 조회 36
jinyoung**** 2022.12.05 - 36
45250 기능/도구
New 여러 파일 인쇄 시 모든 시트 인쇄하는 법 (1)
남솔 | 2022.12.05 | 추천 0 | 조회 36
남솔 2022.12.05 - 36
45247 함수/공식
New 사칙연산 중 0이 들어간 경우는 어떻게 해야 하나요? (8) 답변완료
욕심없는성공v | 2022.12.05 | 추천 0 | 조회 49
욕심없는성공v 2022.12.05 - 49