Note: The other languages of the website are Google-translated. Back to English

워크 시트 또는 통합 문서를 하나의 워크 시트로 병합하거나 통합하는 방법은 무엇입니까?

일상적인 작업에서 Excel에서 복사 및 붙여 넣기 명령을 사용하면 데이터를 분석하기 위해 수백 개의 시트 또는 통합 문서를 하나의 시트로 병합하는 문제가 발생할 수 있습니다. 이 튜토리얼에서는이 작업을 빠르게 해결하기위한 몇 가지 팁을 제공합니다.

문서 결합 1

빠른 탐색

VBA를 사용하여 활성 통합 문서의 모든 시트를 하나의 시트로 병합
클릭 한 번으로 수십 개의 시트 또는 통합 문서를 하나의 워크 시트 / 통합 문서로 병합
두 테이블을 하나로 병합하고 클릭으로 열 단위로 업데이트
샘플 파일 다운로드


VBA를 사용하여 활성 통합 문서의 모든 시트를 하나의 시트로 병합

이 섹션에서는 실행하는 동안 활성 통합 문서의 모든 시트를 수집하는 새 시트를 만드는 VBA 코드를 제공합니다.

1. 모든 시트를 결합 할 통합 문서를 활성화 한 다음 + 여는 열쇠 응용 프로그램 용 Microsoft Visual Basic 창.

2. 팝업 창에서 끼워 넣다 > 모듈 새 모듈 스크립트를 만듭니다.

3. 아래 코드를 복사하여 스크립트에 붙여 넣습니다.

Sub Combine()
'UpdatebyExtendoffice
Dim J As Integer
On Error Resume Next
Sheets(1).Select
Worksheets.Add
Sheets(1).Name = "Combined"
Sheets(2).Activate
Range("A1").EntireRow.Select
Selection.Copy Destination:=Sheets(1).Range("A1")
For J = 2 To Sheets.Count
Sheets(J).Activate
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select
Selection.Copy Destination:=Sheets(1).Range("A65536").End(xlUp)(2)
Next
End Sub
문서 결합 2

4. 프레스 F5 키를 누르면 시트의 모든 데이터가 모든 시트의 앞에 배치되는 Combined라는 새 시트에 병합되었습니다.


이동

급여 인상과 가족 동반에 많은 시간을 원하십니까?

Office Tab은 현재 작업중인 Microsoft Office에서 효율성을 50 % 향상시킵니다.

믿을 수 없을 정도로 두 개 이상의 문서에서 작업하는 것이 하나에서 작업하는 것보다 쉽고 빠릅니다.

잘 알려진 브라우저와 비교할 때 Office 탭의 탭 도구는 더 강력하고 효율적입니다.

매일 수백 번의 마우스 클릭과 키보드 입력을 줄이십시오. 이제 마우스 손에 작별 인사를하십시오.

일반적으로 여러 문서에서 작업하는 경우 Office Tab을 사용하면 시간을 크게 절약 할 수 있습니다.

30-일 무료 평가판, 신용 카드가 필요하지 않습니다.

더 읽기지금 무료 다운로드


클릭 한 번으로 수십 개의 시트 또는 통합 문서를 하나의 워크 시트 / 통합 문서로 병합

VBA를 사용하면 활성 통합 문서의 시트 만 결합 할 수 있지만 통합 문서의 시트를 시트 또는 통합 문서에 병합하는 방법은 무엇입니까?

통합 문서의 시트를 하나의 시트로 병합
문서 결합 18

통합 문서의 시트를 하나의 통합 문서로 병합
문서 결합 3

이 작업을 해결하고 시트 조합에 대한 다른 요구 사항을 충족하려면 결합 기능은 네 가지 조합 시나리오로 개발되었습니다.

  • 여러 시트 또는 통합 문서를 하나의 시트로 결합
  • 여러 시트 또는 통합 문서를 하나의 통합 문서로 결합
  • 동일한 이름 시트를 하나의 시트로 결합
  • 시트 또는 통합 문서의 값을 하나의 시트로 통합

두 번째 옵션은 다음과 같습니다.

여러 시트 또는 통합 문서를 하나의 통합 문서로 결합

무료 설치 Excel 용 Kutools는 다음과 같이하십시오.

1. Excel을 활성화하고 쿠툴즈 플러스 > 결합, 결합하려는 통합 문서를 닫아야 함을 알리는 대화 상자가 나타납니다. 딸깍 하는 소리 OK 계속합니다.
문서 결합 4
문서 결합 5

2. 에서 워크 시트 결합 1 단계 대화 상자, 확인 통합 문서의 여러 워크 시트를 하나의 통합 문서로 결합 선택권. 딸깍 하는 소리 다음 마법사의 다음 단계로 이동합니다.
문서 결합 6

3. 클릭 추가 > 입양 부모로서의 귀하의 적합성을 결정하기 위해 미국 이민국에 or 폴더 결합하려는 통합 문서를 통합 문서 목록 창에서 이름을 확인하여 함께 결합 할 워크 시트를 지정할 수 있습니다. 워크 시트 목록 창유리. 딸깍 하는 소리 다음 마법사의 마지막 단계로 이동합니다.
문서 결합 7

4.이 단계에서는 필요에 따라 설정을 지정합니다. 그런 다음 마감재 .
문서 결합 8

5. 결합 된 통합 문서를 배치 할 폴더를 선택하는 창이 나타납니다. 찜하기.
문서 결합 9

이제 통합 문서가 하나의 통합 문서로 병합되었습니다. 그리고 모든 시트의 맨 앞에 Kutools for Excel이라는 마스터 시트가 생성되어 각 시트의 시트 및 링크에 대한 정보를 나열합니다.
문서 결합 10

데모 : 시트 / 통합 문서를 하나의 시트 또는 통합 문서로 결합

Excel 용 Kutools : 200 + 유용한 편리한 도구로 Excel의 복잡한 작업을 몇 번의 클릭으로 단순화합니다.

이제 마우스 손과 자궁 경부 척추증에 작별 인사

Excel용 Kutools의 300가지 고급 도구 해결 80% 몇 초 만에 Excel 작업을 수행하면 수천 번의 마우스 클릭에서 벗어날 수 있습니다.

1500개의 작업 시나리오를 쉽게 처리하고 솔루션을 찾는 데 시간을 낭비할 필요가 없으며 인생을 즐길 수 있는 많은 시간이 있습니다.

당신을 포함하여 매일 80명 이상의 매우 유능한 사람들의 생산성을 110000% 향상시키십시오.

더 이상 고통스러운 공식과 VBA에 의해 괴로움을 당하지 않고 두뇌에 휴식과 즐거운 작업 분위기를 제공하십시오.

30-모든 기능을 갖춘 일 무료 평가판, 30-이유 없이 당일 환불.

더 나은 몸은 더 나은 삶을 만듭니다.


두 테이블을 하나로 병합하고 클릭으로 열 단위로 업데이트

아래 스크린 샷과 같이 두 개의 테이블을 하나로 병합하고 열을 기반으로 데이터를 업데이트하려면 다음을 시도하십시오. 테이블 병합 ~의 유용성 Excel 용 Kutools.
문서 결합 11

Excel 용 Kutools : Excel에서 몇 번의 클릭으로 복잡한 작업을 단순화하는 200 개 이상의 편리한 Excel 추가 기능

무료 설치 Excel 용 Kutools는 다음과 같이하십시오.

1. 클릭 쿠툴즈 플러스 > 테이블 병합 사용하려면 테이블 병합 마법사.
문서 결합 12

2. 마법사의 1 단계에서 기본 테이블과 조회 테이블 범위를 별도로 선택해야합니다. 그런 다음 다음.
문서 결합 13

3. 기본 테이블에서 데이터를 업데이트 할 키 열을 선택합니다. 딸깍 하는 소리 다음.
문서 결합 14

4. 그런 다음 룩업 테이블을 기반으로 데이터를 업데이트하려는 기본 테이블의 열을 확인합니다. 딸깍 하는 소리 다음.
문서 결합 15

5. 마법사의 4 단계에서 조회 테이블에서 기본 테이블로 추가 할 열을 확인합니다. 딸깍 하는 소리 다음.
문서 결합 16

6. 마법사의 마지막 단계에서 필요에 따라 설정 옵션을 지정합니다. 그런 다음 마감재 .
문서 결합 17

이제 기본 테이블이 데이터를 업데이트하고 조회 테이블을 기반으로 새 데이터를 추가했습니다.

데모 : 시트 / 통합 문서를 하나의 시트 또는 통합 문서로 결합

Excel 용 Kutools : 200 + 유용한 편리한 도구로 Excel의 복잡한 작업을 몇 번의 클릭으로 단순화합니다.


샘플 파일 다운로드

견본


권장 생산성 도구

Office 탭-Microsoft Office 2019-2003 및 Office 365에서 탭 브라우징, 편집, 문서 관리


사무실 탭

Excel 2019-2007 가속화를위한 전문 추가 기능, 몇 시간의 작업을 몇 초로 단축

이 추가 기능에는 수십 개의 전문가 그룹이 포함되어 있으며 300 개 이상의 옵션이 Excel에서 일상적인 작업의 대부분을 자동화하고 생산성을 50 % 이상 향상시킵니다. 원 클릭 옵션 그룹 및 일괄 변환과 같은.
이제 Excel 용 Kutools로 속도를 높일 수있는 기회입니다!


코멘트 (168)
아직 평가가 없습니다. 가장 먼저 평가하세요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
첫 번째 매크로 기능을 사용했습니다. 와! 게시해 주셔서 감사합니다
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
내가 생각하는 코드 'Selection.Offset(0, 0).Resize(Selection.Rows.Count - 1).Select'가 없어야 합니다. 내 말에, 그것이하는 일은 첫 번째 행이 누락 된 두 번째 행을 선택하는 것입니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
나도 같은 문제가있어. 추가된 두 번째 워크시트에서 첫 번째 행을 생략하고 있습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
중복된 헤더가 없도록 헤더를 제거합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
매력처럼 작동합니다. 공유해 주셔서 감사합니다!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
고맙습니다! 매크로가 완벽하게 작동했습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Excel에서 VBN 기능을 사용하는 방법을 모르겠습니다. 어떻게 하는지 도와주세요.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
굉장합니다, 감사합니다!!! 매우 매우 유용
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
매크로 XNUMX은 잘 작동합니다. 감사해요!! 그것은 굉장!!!! :)
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
문제를 해결하기 위해 Selection.Copy Destination:=Sheets(65).Range("A1").End(xlUp)(65536) 라인을 늘려야 하는 경우 2k 행 제한으로 제한됩니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
그러나 훌륭한 도구이지만 21개의 시트를 모두 결합하지는 않습니다. 어떻게 범위를 확장할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
노트!!! 매크로에 주의해야 합니다. 데이터에 연속적인 정보 흐름이 있고 빈 행이 없으면 작동합니다. 이것은 "Selection.CurrentRegion.Select" 라인이 하는 일입니다. 예를 들어 스프레드시트의 모든 데이터를 복사해야 하지만 행 200에 빈 줄이 있는 경우 매크로는 행 200까지만 복사합니다. 해당 행 아래의 모든 데이터는 무시됩니다!!!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
누구든지이 문제를 피하는 명령을 알고 있습니까? Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select 문제를 해결할 수 있습니까? Selection.Rows.Count - 1)은 문제를 일으키는 명령입니다. 누구나??
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
위에서 시작해서 아래로 내려가는 것보다 아래에서 시작해서 위로 올라가
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
빈 행과 열의 문제를 해결하는 코드를 아는 사람이 있습니까? 내 데이터에 있지만 상향식으로 시작하는 간단한 솔루션이 없습니까? 감사해요!
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
비어 있는 행 삭제: 옵션 1: A열에서 삭제해야 하는 셀을 선택합니다. Ctrl 키를 누른 다음 팝업에서 전체 행을 선택합니다. 통합 문서를 저장하고 종료합니다. 그런 다음 통합 문서를 엽니다. 옵션 2: 삭제해야 하는 행을 선택합니다. Ctrl 사용 -. 통합 문서를 저장하고 열린 통합 문서를 종료합니다. 무슨 일이 일어나고 있는지 볼 수 있도록 옵션 1을 제공하십시오. 비어 있는 열을 삭제하는 경우: 열을 선택합니다. Ctrl 키 -. 통합 문서를 저장하고 열린 통합 문서를 종료합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
빈 셀 아래에 데이터를 복사하는 솔루션이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
고맙습니다 ! 내 두 번째 행은 모든 시트에서 비어 있었고 혼란 스러웠습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
vba 코드는 훌륭하게 작동했지만 결합할 워크시트의 셀에 새 행이나 새 데이터를 추가할 때 업데이트하려면 결합된 워크시트가 필요합니다. 그것을 할 수있는 방법이 있습니까? 도와주셔서 감사합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
매크로 코드는 첫 번째 결합된 워크시트에서 훌륭하게 작동했지만 결합할 기존 워크시트에 데이터를 추가할 때 업데이트하려면 결합된 워크시트가 필요합니다. 그것을 할 수있는 방법이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
다른 워크시트에 행을 추가할 때 마스터에서 업데이트하는 방법을 알아낸 적이 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
수고하셨습니다.. 2시간에서 10분으로 단축되었습니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
훌륭합니다. 첫 번째 매크로와 Kutools를 모두 사용했는데 둘 다 데이터 수집 및 컴파일 작업을 크게 줄였습니다. 공유해 주셔서 감사합니다.
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
방금 아래에 주어진 부분을 지웠고 이제 업데이트만 됩니다. 도움이 되기를 바랍니다... Sheets(1).Select Worksheets.Add
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
코드가 잘 작동합니다! 시트의 모든 데이터를 복사하려면 매크로가 필요합니다. Sheet 1 다음의 첫 번째 행을 잘라내고 있습니다. Sheet XNUMX에만 헤더 행이 있고 다른 시트는 데이터일 뿐입니다. 이게 가능해?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
"VBA 코드를 사용하여 모든 워크시트를 하나의 워크시트로 병합"에 대한 질문이 있습니다. 코드는 매우 잘 작동하지만 비어 있는 경우에만 헤더를 추가하고 빈 시트를 통합하지 않도록 코드를 수정할 수 있습니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
덕분에 한 시간 동안 복사하여 붙여넣을 수 있었습니다.:D
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
데이터는 같지만 두 번째 통합 문서에는 추가 데이터가 있고 일부 데이터가 업데이트되었습니다. inv# Status 123 7/2 open inv# status 123 7/2 open 7/7 closed 하나로 병합하는 방법 중복 제거 또는 강조 표시 및 추가 첫 번째 inv#이 아닌 모든 새 inv#
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
A 열이 비어 있지 않은 경우 잘 작동합니다. A열이 비어 있는 시트에서는 덮어쓰는 것 같습니다. 내 데이터에서 E 열은 모든 시트에서 비어 있지 않습니다. 일부 시트의 빈 열 A를 설명하도록 복사 대상을 수정하려면 어떻게 해야 합니까?
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Sub CopySheet() ' ' CopySheet 매크로 ' ' Dim i As Integer For i = 2 to 25 Sheets("Sheet1").Select Range("A1").Select Selection.End(xlDown).Select Range("A" & CStr(Selection.Row) + 1).Select Sheets("Sheet" & CStr(i)).Select Range("A2").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection) .End(xlToRight)).Select Selection.Cut Sheets("Sheet1").Select ActiveSheet.Paste Next End Sub
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
Range("A:A").SpecialCells(xlCellTypeLastCell).Select ActiveCell.Offset(1, 0).Select '이 코드를 사용하여 열 "A"의 마지막 셀을 선택합니다. [인용] Sub CopySheet() ' ' CopySheet Macro ' ' Dim i As Integer For i = 2 To 25 Sheets("Sheet1").Select Range("A1").Select Selection.End(xlDown).Select Range("A" & CStr(Selection.Row) + 1) .시트 선택("시트" & CStr(i)).범위 선택("A2").범위 선택(선택, 선택.End(xlDown)).범위 선택(선택, 선택.End(xlToRight)).선택 선택 .Cut Sheets("Sheet1").ActiveSheet 선택.다음 End Sub 붙여넣기클로페즈[/ 인용]
이 댓글은 사이트의 중재자에 의해 최소화되었습니다
매크로 코드가 너무 잘 작동했습니다 ... FAB JOB :-)
아직 코멘트가 없습니다
더보기
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치

Follow Us

저작권 © 2009 - WWW.extendoffice.com. | 판권 소유. 에 의해 구동 ExtendOffice. | | 사이트 맵
Microsoft 및 Office 로고는 미국 및 / 또는 기타 국가에서 Microsoft Corporation의 상표 또는 등록 상표입니다.
Sectigo SSL로 보호