워드 VBA 코드를 사용한 문서 이동 자동화

워드 VBA 코드를 사용한 문서 이동 자동화

소개

많은 사람들이 문서 작업을 할 때, 한 문서에서 다른 문서로 내용을 이동하거나 복사하는 작업을 자주 수행합니다. 이런 작업은 반복적이고 시간이 많이 소요되는 작업일 수 있습니다. 하지만 워드의 VBA(Visual Basic for Applications) 코드를 이용하면 이 작업을 자동화할 수 있습니다. 이번 포스팅에서는 워드 VBA 코드를 사용한 문서 이동 자동화에 대해 알아보겠습니다.

VBA(Visual Basic for Applications)

VBA는 마이크로소프트 오피스 제품군에 포함된 프로그래밍 언어로, 워드, 엑셀, 파워포인트 등에서 사용할 수 있습니다. VBA를 사용하면 애플리케이션의 기능을 확장하거나 자동화할 수 있습니다. 워드 VBA를 사용하여 문서 이동 작업을 자동화할 수 있습니다.

워드 VBA를 이용한 문서 이동 자동화

아래는 워드 VBA 코드를 사용하여 문서 이동을 자동화하는 예제입니다.

Sub MoveDocument()
    Dim SourceFileName As String
    Dim TargetFileName As String

    ' 원본 문서 경로 및 파일명
    SourceFileName = "C:\Documents\Source.docx"

    ' 대상 문서 경로 및 파일명
    TargetFileName = "C:\Documents\Target.docx"

    ' 원본 문서 열기
    Documents.Open FileName:=SourceFileName

    ' 원본 문서 내용 복사
    Selection.WholeStory
    Selection.Copy

    ' 대상 문서 열기
    Documents.Open FileName:=TargetFileName

    ' 대상 문서 마지막 위치로 이동
    Selection.EndKey Unit:=wdStory

    ' 원본 문서 내용 붙여넣기
    Selection.Paste

    ' 원본 문서 저장 및 닫기
    Documents(SourceFileName).Save
    Documents(SourceFileName).Close

    ' 대상 문서 저장 및 닫기
    Documents(TargetFileName).Save
    Documents(TargetFileName).Close
End Sub

위 코드는 원본 문서를 열고, 해당 문서의 내용을 복사하여 대상 문서의 마지막 위치에 붙여넣는 작업을 수행합니다. 코드 실행 전에 원본 문서와 대상 문서의 경로와 파일명을 적절하게 수정해야 합니다.

VBA 코드 실행 방법

위의 예제 코드를 실행하기 위해서는 아래와 같은 단계를 따라야 합니다.

1. 워드를 실행합니다.
2. ALT + F11 키를 눌러 VBA 편집기를 엽니다.
3. VBA 편집기 창에서 Insert -> Module 을 선택합니다.
4. 모듈 창에 예제 코드를 붙여 넣고 저장합니다.
5. ALT + F8 키를 눌러 매크로 대화상자를 엽니다.
6. MoveDocument 매크로를 선택하고 실행합니다.

마치며

이번 포스팅에서는 워드 VBA 코드를 사용하여 문서 이동 자동화에 대해 알아보았습니다. VBA를 사용하면 반복적이고 시간 소요가 큰 작업을 자동화하여 업무 효율을 높일 수 있습니다. 워드를 사용하는 경우에는 VBA를 익히고 활용하여 작업을 자동화해보는 것을 추천드립니다.