비정형 채우기 입니다

기능/도구
작성자
khj****
작성일
2022-08-04 19:02
조회
55
엑셀버전 : 엑셀2019

운영체제 : 윈도우11

질문 요약 : 작업일보를 피벗에서 사용 가능한 데이타로 만들려 합니다

작업 일보 입니다
많은 자료를 수작업으로 하려고 하니 어렵네요
일반적으로 형식은 정형화 되어 있는거 같이 보이나
자료의 갯수가 날이 갈수록 늘어 납니다

파일 첨부되어 있고요
파일안에 제가 의도한 내용을 적어 놓았읍니다

고수님들 부탁 드립니다

감사 합니다

전체 5

  • 2022-08-04 19:42

    @khj**** 님 우선 50칸씩 주기적으로 데이터가 수정되고 있어서..

    VBA를 사용하면 어렵지 않게 구현할 수 있을 것 같습니다

    아래는 노란색 영역을 오른쪽으로 이동하는 코드이고 나머지도 적절히 수정해서 잘 사용해보세요..

    For i = 0 To 100
    Range("A" & i*50+38 & ":A" & i*50+50).Copy Range("B" & i*50+38 & ":B" & i*50+50)
    Range("A" & i*50+38 & ":A" & i*50+50).ClearContents
    Next

     


    • 2022-08-05 07:06

      @더블유에이 님 제가 vba 전혀사용 해보지 않아서

      사용법을 알려 주실수 있는지요


      • 2022-08-05 08:37

        @khj**** 님 단축키로 Alt + F11 를 누르면 매크로 편집기가 실행됩니다.

        삽입 - 모듈을 클릭해서 새 모듈을 추가하시고

        Sub 새코드 ()

        End Sub

        사이에 위 코드를 작성하신 뒤 실행해보세요


  • 2022-08-05 09:14

    해보겠읍니다

    감사합니다


  • 2022-08-05 09:55

    @khj**** 님 필터를 사용해보세요
    1 A,B 열 복사해서 F,G열에 값 붙여넣기
    2 A열 필터 걸어서 날짜만 골라내서 E열에 =로 A열 불러오기
    3 A열 날짜만 빼고 나머지 필터해서 E3셀에 =E2 이런식으로 윗셀 불러오기
    4 날짜 열 완성
    5 B열에서 빈 셀, 직종, 직영용역, 직원을 빼고 필터링해서 A열에 =으로 E열 값을 불러오기
    날짜 서식 바꾸기
    6 A열에 필터해서 작업일보, 날짜, 현장명, 공사기간, NO, 협력업체소계, 직영, 직영소계, 금일합계, 중기투입현황, 중기명, 빈칸을 빼고
    7 E열 날짜값을 A열에 =로 연결, F열 중기명을 B열에 =로 연결
    8 표 전체 잡고 일반선 모든 테두리
    9 A열에 필터걸고 작업일보만 필터, 전체 잡고 셀서식으로 위쪽에 두꺼운 선, 채우기 회색
    10 전체 잡고 외곽선 두껍게
    11 A~D열 전체 복사, CTRL+ALT+V로 제자리에 값 붙여넣기로 수식 제거
    12 E~G열 열 삭제

    전체 다 하는데 4분 47초 걸렸는데 영상이 커서 올라가질 않아서 말로 적었습니다

    첨부파일 : 작업일보-정리-1.xlsx


전체 7,301
번호 카테고리 제목 작성자 작성일 추천 조회
알림
[🏆 VBA 4주 완성 특별 스터디] 1기 - 우수 졸업생 및 후기, 축하합니다! (5)
오빠두엑셀 | 2022.07.31 | 추천 7 | 조회 842
오빠두엑셀 2022.07.31 7 842
공지사항 함수/공식
New [신규 기능 업데이트!] 👉 이제 게시글 작성시 스크린샷 복/붙이 가능합니다! 😎 (2)
오빠두엑셀 | 2022.08.04 | 추천 3 | 조회 64
오빠두엑셀 2022.08.04 3 64
공지사항 함수/공식
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (87)
오빠두엑셀 | 2021.10.28 | 추천 116 | 조회 5952
오빠두엑셀 2021.10.28 116 5952
40987 VBA
New 선택한 셀 근처에 차트 나타내기 엑셀파일첨부파일 (1)
eexcell | 2022.08.08 | 추천 0 | 조회 23
eexcell 2022.08.08 - 23
40982 VBA
New 입력 수량에 따른 버튼 또는 레이블 생성 첨부파일
늙은베짱이 | 2022.08.08 | 추천 -2 | 조회 22
늙은베짱이 2022.08.08 -2 22
40974 함수/공식
New 사과를 치면 옆 셀에 과일로, 배추를 치면 옆 셀에 야채로 넣는 방법 첨부파일 (6) 답변완료
곡식창고 | 2022.08.08 | 추천 0 | 조회 37
곡식창고 2022.08.08 - 37
40971 기능/도구
New 이름 정의 범위 선택시 에러 발생 엑셀파일첨부파일 (3)
라운드티 | 2022.08.08 | 추천 0 | 조회 36
라운드티 2022.08.08 - 36
40966 함수/공식
New TEXTJOIN함수에서 대싱 셀값이 0일때 JOIN안되게 하는 방법 (8) 답변완료
마운틴 | 2022.08.08 | 추천 0 | 조회 41
마운틴 2022.08.08 - 41
40963 함수/공식
New 특정문자가 포함된 여러 셀값을 특정문자 별로 정리하고 싶습니다. 엑셀파일 (1)
rin**** | 2022.08.08 | 추천 0 | 조회 33
rin**** 2022.08.08 - 33
40961 기능/도구
New G메일로 받은 내용 중 회신시간이 늦은 메일들을 엑셀로 관리할 수 있는 방법이 있을까요 ? (1)
최사무엘 | 2022.08.08 | 추천 0 | 조회 28
최사무엘 2022.08.08 - 28
40960 기능/도구
New 보안경고 안뜨게 설정하려면 어떻게 옵션을 설정해야 하나요? 첨부파일 (1)
니가가라 하와이 | 2022.08.08 | 추천 0 | 조회 19
니가가라 하와이 2022.08.08 - 19
40958 차트/그래프
New 그래프 가로 축 레이블 설정 부분 첨부파일 (1)
성호 | 2022.08.08 | 추천 0 | 조회 29
성호 2022.08.08 - 29
40955 함수/공식
New 선택 셀의 좌측 셀값을 가져오는 수식이 필요합니다. 엑셀파일 (3)
낮은자 | 2022.08.08 | 추천 0 | 조회 44
낮은자 2022.08.08 - 44
40953 함수/공식
New 특정 조건에 맞추어 월 별 주차 계산을 하고 싶습니다 엑셀파일첨부파일 (2)
행주 | 2022.08.07 | 추천 0 | 조회 34
행주 2022.08.07 - 34
40952 문서서식
New 데이터 유효성 검사 - 드롭다운 표시 항상 보이게? 첨부파일 (1)
두리둥 | 2022.08.07 | 추천 0 | 조회 30
두리둥 2022.08.07 - 30
40945 VBA
New 엑셀 파일 엑셀 다른이름 자동 저장이 가능할까요? 노가다 살려주세요 ㅠㅠ (2)
듀링e | 2022.08.07 | 추천 0 | 조회 56
듀링e 2022.08.07 - 56
40937 파워쿼리/피벗
New 시트별로 열이 다른 경우 시트를 통합하는 방법 첨부파일 (1)
곰도리 | 2022.08.07 | 추천 0 | 조회 37
곰도리 2022.08.07 - 37
40936 VBA
New 달력 유저폼 실행위치관련 질문 엑셀파일첨부파일 (6) 답변완료
033cola | 2022.08.07 | 추천 1 | 조회 46
033cola 2022.08.07 1 46
40921 함수/공식
New 값이 있는 경우에만 DATE 함수가 적용되도록 하고 싶습니다. 첨부파일 (2) 답변완료
지용 | 2022.08.06 | 추천 0 | 조회 47
지용 2022.08.06 - 47
40916 문서서식
New 이동옵션에서 상수와 수식 첨부파일 (1)
황혼고래 | 2022.08.06 | 추천 0 | 조회 50
황혼고래 2022.08.06 - 50
40915 문서서식
New 셀 서식 중 "월", 월 차이 (2)
보라색양털 | 2022.08.06 | 추천 1 | 조회 47
보라색양털 2022.08.06 1 47
40912 함수/공식
New IF 조건문이 잘 되지 않습니다. 첨부파일 (5) 답변완료
비트리 | 2022.08.06 | 추천 0 | 조회 44
비트리 2022.08.06 - 44
40908 VBA
New 매월 초 100개의 파일을 100개의 거래처로 메일 보내는 방법 문의 (1)
alth**** | 2022.08.06 | 추천 0 | 조회 55
alth**** 2022.08.06 - 55
40906 기능/도구
New 시트 이동복사 했는데 똑같이 보여지지 않아요 (1) 답변완료
pooh09**** | 2022.08.06 | 추천 1 | 조회 45
pooh09**** 2022.08.06 1 45
40904 문서서식
New 4명의 일일실적을 월별 총합으로 보기좋게 작성할 수 있을까요? (4) 답변완료
nobody | 2022.08.06 | 추천 0 | 조회 46
nobody 2022.08.06 - 46
40903 함수/공식
New =YahooFinanceHistory( )사용방법 문의 (2) 답변완료
eexcell | 2022.08.06 | 추천 0 | 조회 36
eexcell 2022.08.06 - 36
40902 VBA
New Page_Setup에서 codename 전달 (2) 답변완료
도다리 | 2022.08.05 | 추천 0 | 조회 33
도다리 2022.08.05 - 33
40898 함수/공식
New 함수 해석좀... (2)
sky3**** | 2022.08.05 | 추천 0 | 조회 45
sky3**** 2022.08.05 - 45
40896 함수/공식
New 고급11강- 필터 함수 공부중 입니다 엑셀파일 (2) 답변완료
세레나 | 2022.08.05 | 추천 0 | 조회 39
세레나 2022.08.05 - 39
40895 VBA
New Get_DB 전체 행이 불러와지지 않습니다 엑셀파일첨부파일 (1)
claire | 2022.08.05 | 추천 0 | 조회 37
claire 2022.08.05 - 37
40892 기능/도구
New 엑셀 셀에 달력 넣기 첨부파일 (1) 답변완료
포에버하윤둥이 | 2022.08.05 | 추천 0 | 조회 41
포에버하윤둥이 2022.08.05 - 41
40889 함수/공식
New 엑셀 여러열 일치하는 값 대입 엑셀파일첨부파일 (5)
| 2022.08.05 | 추천 0 | 조회 46
2022.08.05 - 46
40887 VBA
New vba combobox에 목록이 처음 들어 갔을 때 안 떠요 엑셀파일첨부파일 (2) 답변완료
ehfkdpah**** | 2022.08.05 | 추천 0 | 조회 27
ehfkdpah**** 2022.08.05 - 27