VBA 처리속도 관련

VBA
작성자
레이맘
작성일
2021-11-22 01:07
조회
51
엑셀버전 : 엑셀2016

운영체제 : 윈도우10

엑셀 1이라는 파일은 엑셀A의 2번째 시트에,

엑셀 2라는 파일은 엑셀A의 세번째 시트로 불러와서

두 시트에 여러 행으로 분산된 데이터를 A열에만 헤쳐모여 시킨다음

대조하여 중복 되는 값을 제거하는 프로그램을 만들고자했...습니다.

여기서 문제는 한두개의 값이 아닌 수십만의 데이터를 돌리는거다보니 처리속도가 상당히 지연되기도하고, 파일 무게도 무거워지는듯해서 설상가상 바이너리 형식으로 저장을해도 처리속도가 느리더라구요...하핫

 

 

 

구성은 1번(두번째시트),2번(세번째시트) 누르셔서 비교할 파일 직접 불러오고

3번,4번 누르셔서 두,세번째 시트 헤쳐모여 시키고

5번 눌러서 값 불러오고(첫번째 시트로)

6번 눌러서 중복되는값들은 지우고, 중복되지 않았던 값들만 남겨둔 후

7번 눌러서 새로운 파일로 저장

 

이런식으로 짜려했습니다.

너무 느려서 어김없이 도움의 손길을 요청드립니다 ㅠㅠ

 

 

파일 첨부를 하고 싶었지만, 무겁다하여 메모장으로 명령문 적어서 올립니다 ㅠㅠ

처리속도-관련2img.jpg

전체 6

  • 2021-11-22 18:42
    채택된 답변

    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Application.AskToUpdateLinks = False
    Application.Calculation = xlCalculationManual
    Application.EnableEvents = False
    Application.CutCopyMode = False

    여기에 코드 입력

    Application.Calculation = xlCalculationAutomatic
    Application.AskToUpdateLinks = True
    Application.DisplayAlerts = True
    Application.ScreenUpdating = True
    Application.EnableEvents = True
    Application.CutCopyMode = True
    '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''


    • 2021-11-24 21:40

      @jhp0 님 감사합니다 ㅎㅎㅎㅎ


  • 2021-11-22 08:47

    파워쿼리도 사용해보셨나요? 파워쿼리 사용하면 한 큐에 해결될 것 같습니다


    • 2021-11-22 14:51

      @엑셀은즐거워 님 파워쿼리 어떻게 접근해야할지 감이 안잡혀서요 ㅠ


      • 2021-11-22 21:05

        @레이맘 님 파워쿼리는 접근이랑 해결방법이 워낙에 다양하기 때문에..ㅎㅎ; 간단한 예제라면 도와드릴 수 있지만ㅜㅜ 그림이나 설명만으로는 작성이 많이 어렵습니다 ㅎㅎ;

        기초 내용은 구글이나 네이버에 검색하면 많이 나오니 한번참고해보시고.. 예전에 라이브 강의내용 중 비슷한 내용이 있어서 같이 적어드리니 한번 참고해보세용

        엑셀 견적서 파일 합치기 자동화 | 파워쿼리 활용 - 오빠두엑셀 (oppadu.com)


  • 2021-11-22 14:59

    이런 식으로 말씀하시는걸까요?ㅠㅠ제가 엑셀 '문외한' 레벨이라 ...ㅎ;;

     

     

     


전체 4,619
번호 카테고리 제목 작성자 작성일 추천 조회
공지사항 공지사항
⭐ [더 나은 커뮤니티 문화를 위한 Q&A 글 작성 규칙] ⭐ (8)
오빠두엑셀 | 2021.10.28 | 추천 12 | 조회 643
트로피 오빠두엑셀 2021.10.28 12 643
24053 파워쿼리/피벗
New 엑셀 배열 순서를 바꾸고 싶습니다. 첨부파일
jyj6**** | 10:04 | 추천 1 | 조회 20
jyj6**** 10:04 1 20
VBA
New Re:엑셀 배열 순서를 바꾸고 싶습니다.
Yukon | 13:01 | 추천 0 | 조회 12
Yukon 13:01 0 12
24048 VBA
New 재고관리 툴 만들기 질문이요 첨부파일 (2)
선물 | 2021.11.26 | 추천 0 | 조회 26
선물 2021.11.26 0 26
24046 함수/공식
New 날짜별로 근태 정리를 하려면 어떻게 해야할까요 첨부파일 (2)
ㅁㅁㅁㅁㅁ | 2021.11.26 | 추천 0 | 조회 36
ㅁㅁㅁㅁㅁ 2021.11.26 0 36
24042 VBA
New 한 코드를 가진 사람의 계약일자 최소값 최대값 구하기 첨부파일
seorin | 2021.11.26 | 추천 0 | 조회 24
seorin 2021.11.26 0 24
24039 함수/공식
New 다중 조건 및 가장 낮은 일시에 매칭되는 값 불러오기 첨부파일 (6)
감사하모니카 | 2021.11.26 | 추천 0 | 조회 28
감사하모니카 2021.11.26 0 28
24038 VBA
New ZAN IMAGE PRINTER 프로그램에서 JPG 파일명을 내 마음대로 (2)
goodman | 2021.11.26 | 추천 0 | 조회 20
goodman 2021.11.26 0 20
24033 문서서식
New 조건부 서식 특정열 단어포함시 해당 행의 서식 변경 방법 첨부파일 (2) 답변완료
아빠의꿈 | 2021.11.26 | 추천 0 | 조회 25
아빠의꿈 2021.11.26 0 25
24032 함수/공식
New 함수 초보 질문있습니다. (2) 답변완료
윤태종 | 2021.11.26 | 추천 0 | 조회 26
윤태종 2021.11.26 0 26
24029 VBA
New 엑셀로그인 프로그램 사용자 개인별 시트만 보이게 하는 방법 첨부파일 (1)
엑셀이 | 2021.11.26 | 추천 0 | 조회 24
엑셀이 2021.11.26 0 24
24014 VBA
New Private Sub Worksheet_Change(ByVal Target As Range) 조건문의 (1)
yg | 2021.11.26 | 추천 1 | 조회 30
yg 2021.11.26 1 30
24011 VBA
New vba 고급필터후 인쇄 자동화 첨부파일 (1)
naver_6180ef1e63220 | 2021.11.26 | 추천 0 | 조회 32
naver_6180ef1e63220 2021.11.26 0 32
24010 문서서식
New 양이 많은 '병합하고 가운데 맞춤 '버튼을 눌러서 할일을 쉽게 하는방법 첨부파일 (3)
아빠의꿈 | 2021.11.26 | 추천 0 | 조회 40
아빠의꿈 2021.11.26 0 40
24009 함수/공식
New 오빠두 강의 중 마지막셀 이동에 관하여 질문드립니다. (MATCH함수) (2)
월마리아 | 2021.11.25 | 추천 0 | 조회 32
월마리아 2021.11.25 0 32
24006 함수/공식
New 조건부 서식 함수 첨부파일 (1)
AFOPWEOI1213 | 2021.11.25 | 추천 -1 | 조회 40
AFOPWEOI1213 2021.11.25 -1 40
24005 파워쿼리/피벗
New 파워쿼리에서 다중조건 평균구하기 (1)
황선규 | 2021.11.25 | 추천 0 | 조회 24
황선규 2021.11.25 0 24
24002 기능/도구
New 엑셀 요 기능 이름이 뭐죠?ㅜㅜ (2) 답변완료
냥냥 | 2021.11.25 | 추천 0 | 조회 35
냥냥 2021.11.25 0 35
24000 함수/공식
New 조건부서식에서 배열수식이 입력가능한가요? (2) 답변완료
무케 | 2021.11.25 | 추천 0 | 조회 33
무케 2021.11.25 0 33
23998 VBA
New Auto_open / Auto_close에서 프로젝트나 라이브러리를 찾을수없습니다. 문제.... 아시는분 (1) 답변완료
카이로젠 | 2021.11.25 | 추천 0 | 조회 23
카이로젠 2021.11.25 0 23
23996 기능/도구
New 제품명 일괄 수정방법 (2) 답변완료
태환11 | 2021.11.25 | 추천 0 | 조회 35
태환11 2021.11.25 0 35
23995 함수/공식
New 해찾기 문제 관련, 전체 양은 10kg은 채우되, 목표 함량을 충족하고 가장 저렴한 방법 찾기..? 첨부파일 (5)
맞장구침 | 2021.11.25 | 추천 0 | 조회 33
맞장구침 2021.11.25 0 33
23991 VBA
New function결과값 외에도 그 안의 값을 다른셀에 입력하고싶습니다 (1)
오리22 | 2021.11.25 | 추천 0 | 조회 21
오리22 2021.11.25 0 21
23990 함수/공식
New or 함수 문의드립니다. (3) 답변완료
무케 | 2021.11.25 | 추천 0 | 조회 31
무케 2021.11.25 0 31
23985 VBA
New 개인용매크로 관련문의입니다. (4) 답변완료
무케 | 2021.11.25 | 추천 0 | 조회 37
무케 2021.11.25 0 37
23980 함수/공식
New 함수문의 드립니다 (5) 답변완료
제이올라 | 2021.11.25 | 추천 0 | 조회 36
제이올라 2021.11.25 0 36
23977 VBA
New 중복행 데이터 입력, 통합 관련 문의드립니다. 첨부파일 (4) 답변완료
케빈 | 2021.11.25 | 추천 0 | 조회 33
케빈 2021.11.25 0 33
23976 VBA
New QR코드 생성후 인식 오류 첨부파일 (1)
빡군 | 2021.11.25 | 추천 0 | 조회 19
빡군 2021.11.25 0 19
23975 함수/공식
New if함수 날짜 문제 관련 첨부파일 (2) 답변완료
이선미 | 2021.11.25 | 추천 0 | 조회 28
이선미 2021.11.25 0 28
23973 함수/공식
New 분할 입고 일정 (첫 입고일/마지막 입고일 요약) 첨부파일 (2)
Gina (배진화/우준 & 지오 맘) | 2021.11.25 | 추천 0 | 조회 27
Gina (배진화/우준 & 지오 맘) 2021.11.25 0 27
23969 VBA
New VBA를 활용하여 hwp 테이블에 삽입하기 (2) 답변완료
Han | 2021.11.25 | 추천 0 | 조회 27
Han 2021.11.25 0 27
23967 함수/공식
New 다중조건 출력 (INDEX & MATCH로는 한계가 있는듯 합니다.) 첨부파일 (1)
얌쫑 | 2021.11.25 | 추천 1 | 조회 46
얌쫑 2021.11.25 1 46