Excel 에서 각 워크시트를 별도의 새 워크북로 내보내고 저장하는 방법은 무엇인가요？

Excel 에서 개별 워크시트를 별도의 통합 문서로 내보내고 저장하는 작업은 데이터를 공유하거나 정리할 때 흔히 발생합니다。 수동으로 워크시트를 복사하여 새 워크북에 붙여넣는 방법도 있지만， 특히 여러 시트가 포함된 통합 문서의 경우 번거롭고 시간이 많이 소요됩니다。 이 가이드에서는 이러한 작업을 단계별로 수행할 수 있는 여러 가지 방법을 소개하며， 사용자의 요구사항과 숙련도에 따라 가장 적합한 해결책을 선택할 수 있도록 도와드립니다。

이동 또는 복사 명령어를 사용하여 워크시트를 하나씩 새 워크북으로 저장

「이동 또는 복사」 명령어를 사용하면 하나 이상의 워크시트를 빠르게 새 워크북으로 내보내거나 복사할 수 있습니다。

단계 1: 탭 바에서 시트 이름을 선택합니다。 여러 워크시트를 선택하려면 「Ctrl」 키를 누른 상태에서 하나씩 클릭합니다。

단계 2: 시트 이름을 마우스 오른쪽 버튼으로 클릭한 후 상황에 맞는 메뉴에서 「이동 또는 복사」를 클릭합니다。

단계 3: 「이동 또는 복사」 대화 상자에서 「선택한 워크시트을(를) 다음 책으로 이동」 드롭다운 목록에서 「(새 책)」 항목을 선택합니다。

단계 4: 그런 다음 「확인」을 클릭하면 내보내기 또는 복사한 워크시트가 포함된 「새 워크북」로 전환됩니다。 「파일」 > 「저장」을 클릭하여 새 워크북을 저장합니다。

참고： 「이동 또는 복사」 대화 상자에는 「복사본 만들기」 옵션이 있습니다。 이 옵션을 선택하지 않으면 선택한 시트이 원본 통합 문서에서 이동되고， 선택하면 선택한 시트이 복사됩니다。

Kutools for Excel 을 사용하여 워크시트를 쉽게 일괄적으로 새 워크북으로 저장

여러 워크시트를 별도의 통합 문서로 저장해야 하는 경우 첫 번째 방법은 적절하지 않습니다。 또한 아래의 VBA 코드는 Excel 초보자에게 다소 복잡할 수 있습니다。 이럴 때는 「Kutools for Excel」의 「워크북 분리」 유틸리티를 사용하여 한 통합 문서의 각 워크시트를 별도의 새 워크북으로 쉽게 일괄 저장할 수 있습니다。

Kutools for Excel 설치 후「Kutools 플러스」 > 「통합 문서」 > 「워크북 분리」을 클릭하여 「워크북 분리」 대화 상자를 엽니다。 그런 다음 다음과 같이 설정합니다。

1. 새 워크북으로 저장할 워크시트를 선택합니다。 기본적으로 모든 워크시트가 선택됩니다。
2. 「옵션」 섹션에서 해당 확인란을 선택하여 숨겨진 워크시트와 빈 워크시트을 건너뛸 수도 있습니다。
3. 「확인」을 클릭합니다。

   

4. 「폴더 선택」 대화 상자가 나타나면 새 워크북을 저장할 대상 폴더를 선택한 후 「폴더 선택」 버튼을 클릭합니다。

그러면 지정된 워크시트 또는 모든 워크시트가 즉시 별도의 새 워크북으로 저장됩니다。

VBA 코드를 사용하여 워크시트를 새 워크북으로 내보내고 저장

다음 코드는 새 워크북의 모든 표시된 워크시트를 내보내어 원본 시트 이름으로 통합 문서를 저장하며， 현재 워크북과 동일한 경로에 새 폴더를 생성합니다。 다음 단계를 따르세요：

단계 1: 「ALT」 + “F11" 키를 누르면 「Microsoft Visual Basic for Applications」 창이 열립니다。

단계 2: 「삽입」 > 「모듈」을 클릭한 후 다음 매크로를 모듈 창에 붙여넣습니다：

VBA： 새 폴더에 워크시트를 새 워크북으로 내보내고 저장

Sub SplitWorkbook()
'Updateby20200806
Dim FileExtStr As String
Dim FileFormatNum As Long
Dim xWs As Worksheet
Dim xWb As Workbook
Dim xNWb As Workbook
Dim FolderName As String
Application.ScreenUpdating = False
Set xWb = Application.ThisWorkbook

DateString = Format(Now, "yyyy-mm-dd hh-mm-ss")
FolderName = xWb.Path & "\" & xWb.Name & " " & DateString

If Val(Application.Version) < 12 Then
    FileExtStr = ".xls": FileFormatNum = -4143
Else
    Select Case xWb.FileFormat
        Case 51:
            FileExtStr = ".xlsx": FileFormatNum = 51
        Case 52:
            If Application.ActiveWorkbook.HasVBProject Then
                FileExtStr = ".xlsm": FileFormatNum = 52
            Else
                FileExtStr = ".xlsx": FileFormatNum = 51
            End If
        Case 56:
            FileExtStr = ".xls": FileFormatNum = 56
        Case Else:
            FileExtStr = ".xlsb": FileFormatNum = 50
        End Select
End If

MkDir FolderName

For Each xWs In xWb.Worksheets
On Error GoTo NErro
    If xWs.Visible = xlSheetVisible Then
    xWs.Select
    xWs.Copy
    xFile = FolderName & "\" & xWs.Name & FileExtStr
    Set xNWb = Application.Workbooks.Item(Application.Workbooks.Count)
    xNWb.SaveAs xFile, FileFormat:=FileFormatNum
    xNWb.Close False, xFile
    End If
NErro:
    xWb.Activate
Next

    MsgBox "You can find the files in " & FolderName
    Application.ScreenUpdating = True
End Sub

단계 3: “F5" 키를 눌러 이 코드를 실행합니다。 그러면 새로 내보낸 통합 문서의 위치를 알려주는 프롬프트 상자가 나타나며， 원본 통합 문서의 모든 워크시트가 새 폴더 내에 원본 시트 이름으로 된 별도의 통합 문서로 내보내집니다。

데모： 각 시트를 새 워크북으로 내보내고 저장

관련 문서：

• 여러 통합 문서를 단일 통합 문서로 결합
• 선택 영역을 개별 파일로 저장
• 통합 문서를 별도의 Excel 파일으로 분할

최고의 Office 생산성 도구

🤖	KUTOOLS AI 도우미： 다음을 기반으로 데이터 분석 혁신하기：지능형 실행   |  코드 생성|  사용자 지정 수식 생성  |  데이터 분석 및 차트 생성|  향상된 함수 호출…
	인기 기능:찾기， 강조 표시 또는 중복 표시   |  빈 행 삭제   |  데이터 손실 없이 열 결합 또는 셀 제거   |  공식을 사용하지 않는 반올림...
	슈퍼 LOOKUP:다중 조건 VLookup  |  다중 값 VLookup  |   여러 시트에서 VLookup   |   퍼지 매치....
	고급 드롭다운 목록:드롭다운 목록 빠르게 생성   |  종속형 드롭다운 목록   |  다중 선택 드롭다운 목록....
	열 관리자:특정 수의 열 추가|열 이동|숨겨진 열의 표시 상태 전환|범위 및 열 비교...
	주요 기능:그리드 포커스   |  디자인 보기   |향상된 수식 표시줄   | 워크북 및 시트 관리자   |  자원 라이브러리(자동 텍스트)|  날짜 선택기   |  워크시트 병합  |  암호화/셀 해독   | 목록으로 이메일 보내기   |  슈퍼 필터   |   특수 필터(굵은 글꼴이 있는 셀 필터링/기울임꼴/취소선。。。) 。。。
	상위 15 도구 모음:12 텍스트도구(텍스트 추가,특정 문자 삭제, ...)|   50+차트유형(간트 차트, ...)|   40+ 실용적인수식(생일을 기준으로 나이 계산, ...)|   19 삽입도구(QR 코드 삽입,경로에서 그림 삽입, ...)|   12 변환도구(단어로 변환하기,환율 변환, ...)|   7 병합 및 분할도구(고급 행 병합,셀 분할, ...)|그 외 더 많은 기능

Kutools 를 선호하는 언어로 사용하세요 – 영어， 스페인어， 독일어， 프랑스어， 중국어 및 40+개 이상의 언어를 지원합니다！

Kutools for Excel 로 Excel 역량을 한 단계 업그레이드하고 전례 없는 효율성을 경험하세요。Kutools for Excel 는 생산성과 저장 시간을 향상시키는 300 개 이상의 고급 기능을 제공합니다。가장 필요한 기능을 지금 바로 확인하세요。。。

Kutools for Excel 에 대한 자세한 정보。。。무료 다운로드。。。

---

Office Tab 가 Office 에 탭 인터페이스를 제공하여 작업을 훨씬 쉽게 만들어 줍니다

• Word, Excel, PowerPoint 에서 탭 기반 편집 및 읽기 기능을 활성화합니다, Publisher, Access, Visio 및 Project 에서도 사용 가능합니다。
• 새 창이 아닌 동일한 창의 새 탭에서 여러 문서를 열고 생성할 수 있습니다。
• 50% 만큼 생산성을 높이고 매일 수백 번의 마우스 클릭을 줄여줍니다！

Office Tab 에 대한 자세한 정보。。。무료 다운로드。。。

---

모든 Kutools 애드인。 하나의 설치 프로그램

Kutools for Office스위트 번들은 Excel, Word, Outlook 및 PowerPoint 용 애드인과 Office Tab Pro 를 포함하며， 다양한 Office 앱을 사용하는 팀에 이상적입니다。

• 올인원 스위트— Excel， Word， Outlook 및 PowerPoint 애드인 + Office Tab Pro
• 하나의 설치 프로그램， 하나의 라이선스— 몇 분 안에 설정 완료(MSI 지원)
• 함께 사용할수록 더 효과적입니다— Office 앱 전반에서 생산성 향상
• 30 일간 모든 기능 무료 체험— 등록이나 신용카드 필요 없음
• 최고의 가성비— 개별 애드인 구매 대비 절약

Kutools for Office 에 대한 자세한 정보。。。무료 다운로드。。。