열린 모든 Word 문서를 한 번에 복사하기

여러 개의 Word 문서를 동시에 열고 있을 때 백업, 공유, 클라우드 스토리지 업로드, 다른 컴퓨터로 전송 또는 이메일 첨부 등의 목적으로 해당 문서들을 다른 폴더로 복사해야 할 수 있습니다. Word 에는 모든 열린 문서을(를) 한 번에 복사하는 직접적인 명령이 제공되지 않지만 이를 수행할 수 있는 몇 가지 신뢰할 수 있는 방법이 있습니다。

이 튜토리얼에서는 세 가지 실용적인 방법을 배우게 됩니다. 각 열린 문서를 수동으로 동일한 폴더에 저장하거나, Kutools for Word 를 사용하여 모든 열린 문서을(를) 한 번의 클릭으로 복사하거나， VBA 매크로를 사용하여 현재 열려 있고 저장된 모든 파일을 선택한 폴더에 자동으로 복사할 수 있습니다。

• 방법 1: 모든 열린 문서를 하나의 폴더에 저장하려면 [다른 이름으로 저장]을 사용하세요。
• 방법 2: Kutools for Word 를 사용하여 모든 열린 문서을(를) 한 번의 클릭으로 복사하세요。
• 방법 3: VBA 를 사용하여 모든 열린 문서을(를) 자동으로 복사하세요。

모든 열린 문서를 하나의 폴더에 저장하려면 [다른 이름으로 저장]을 사용하세요。

이 방법은 모든 Word 버전에서 작동합니다。 먼저 모든 열린 문서를 동일한 폴더에 저장한 후 해당 폴더에서 모든 파일을 함께 선택하여 복사하거나 이메일에 함께 첨부할 수 있습니다。

Office Tab

Word， Excel， PowerPoint 등에서 웹 브라우저처럼 탭 기반 탐색을 지원하여 하나의 창에서 부드럽게 전환할 수 있습니다。

무료 다운로드자세히 알아보기

1. Word 에서 첫 번째로 열린 문서로 전환합니다。
2. 클릭하세요。파일>다른 이름으로 저장， 그런 다음찾아보기를 선택합니다。

   

3. [다른 이름으로 저장] 창에서 대상 폴더로 이동합니다。 주소 표시줄에 폴더 이름이 나타나는지 확인한 후저장을 클릭합니다。

   

4. 각 열린 문서에 대해 동일한 단계를 반복하고 항상 동일한 폴더를 선택하세요。
5. 작업이 완료되면 파일 탐색기에서 해당 폴더를 열고Ctrl + A를 눌러 모든 파일을 선택한 후 마우스 오른쪽 버튼을 클릭하고복사를 선택합니다。

   

선택한 모든 문서가 이제 복사되었으며 새 위치에 붙여넣거나 이메일에 첨부할 준비가 되었습니다。

Kutools for Word 를 사용하여 모든 열린 문서을(를) 한 번의 클릭으로 복사하세요。

여러 개의 열린 문서를 자주 복사하거나 수집해야 한다면 Kutools for Word 가 시간을 절약해 줄 수 있습니다。 이 도구는 현재 열린 모든 문서를 선택한 폴더에 단 한 번의 클릭으로 복사할 수 있는 내장 기능을 제공합니다。

1. Word 를 열고 복사하려는 모든 문서가 현재 열려 있고 저장되었는지 확인하세요。
2. 리본의Kutools 플러스탭에서더보기>모든 열린 파일 복사를 클릭하세요。

   

3. 파일이 성공적으로 복사되었음을 확인하는 대화 상자가 나타납니다。확인을 클릭하세요。

   

모든 열린 파일 복사를 클릭한 후모든 열린 파일 복사선택한 문서가 클립보드에 복사됩니다。 이후 원하는 대상 폴더를 열고Ctrl + V를 눌러 해당 위치에 붙여넣거나 이메일 창에 직접 첨부 파일로 붙여넣을 수 있습니다。

참고：

이 기능을 사용하기 전에 모든 열린 문서이(가) 저장되어 있는지 확인하세요. 저장되지 않은 변경 사항이 포함된 문서는 성공적으로 복사되지 않습니다. Kutools 는 실패한 파일 목록을 표시하므로 해당 파일을 저장한 후 다시 시도할 수 있습니다。

VBA 를 사용하여 모든 열린 문서을(를) 자동으로 복사하세요。

애드인 없이 자동화된 방법을 선호한다면 VBA 매크로를 사용할 수 있습니다。 이 매크로는 선택한 폴더에 현재 열려 있고 저장된 모든 문서를 복사합니다。 파일은 원래 위치에서 직접 복사되므로 현재 열린 문서는 변경되지 않습니다。

1. Word 에서Alt + F11을 눌러 VBA 편집기를 엽니다。
2. 클릭하세요。삽입>모듈.

   

3. 다음 코드를 모듈에 붙여넣으세요。

   Option Explicit
   
   Sub CopyAllOpenDocuments()
   
       Dim doc As Document
       Dim destFolder As String
       Dim src As String, dst As String
       Dim fso As Object
       Dim count As Long
   
       With Application.FileDialog(msoFileDialogFolderPicker)
           If .Show <> -1 Then Exit Sub
           destFolder = .SelectedItems(1)
       End With
   
       If Right(destFolder, 1) <> "\" Then destFolder = destFolder & "\"
   
       Set fso = CreateObject("Scripting.FileSystemObject")
   
       For Each doc In Application.Documents
           If doc.Path <> "" Then
               src = doc.FullName
               dst = destFolder & doc.Name
   
               If LCase$(src) <> LCase$(dst) Then
                   fso.CopyFile src, dst, True
                   count = count + 1
               End If
           End If
       Next doc
   
       MsgBox count & " document(s) copied successfully.", vbInformation, "Kutools for Word"
   
   End Sub

4. 누르세요。F5매크로를 실행합니다。
5. 폴더 선택 대화 상자가 나타납니다。 열린 문서를 복사할 대상 폴더를 선택한 후확인을 클릭하세요。

   

6. 몇 개의 문서가 성공적으로 복사되었는지를 보여주는 확인 대화 상자가 나타납니다。

   

해당 조건을 충족하는 모든 열린 문서가 이제 선택한 폴더에 복사되었습니다。 해당 폴더를 열어 복사된 파일을 확인， 이동， 업로드하거나 필요에 따라 이메일에 첨부할 수 있습니다。

어떤 방법을 사용해야 할까요？

결론

이 작업을 가끔씩만 수행하고 열린 문서가 소수뿐이라면 하나의 폴더에 저장하는 방법으로 충분합니다. 자주 수행하거나 많은 파일을 동시에 처리한다면 Kutools for Word 가 한 번의 클릭으로 저장 시간할 수 있습니다. 애드인 없이 완전히 자동화된 솔루션이 필요하다면 VBA 가 가장 유연한 옵션입니다。

이 튜토리얼이 도움이 되었기를 바랍니다。 더 많은 Word 팁과 실용적인 해결책을 알아보고 싶다면여기를 클릭하세요전체 Word 튜토리얼 모음을 살펴보세요。