본문 바로가기
■ 칼퇴를 위한 VBA : 사례/- VBA for 워드

워드 문서에서 특정 단어 빈도수 세기를 자동화하는 VBA 코드

by 포탈메이커 2023. 7. 4.

워드 문서에서 특정 단어 빈도수 세기를 자동화하는 VBA 코드

많은 사람들은 워드 문서에서 특정 단어의 빈도수를 세는 작업을 수행해야 할 때가 있습니다. 가령, 긴 문서에서 특정 키워드의 출현 빈도를 알고 싶거나, 주제별로 단어의 사용 빈도를 파악하고 싶을 때 등입니다. 이런 작업은 수작업으로 하기에는 매우 번거롭고 시간도 많이 소모됩니다. 이런 경우에 VBA 코드를 활용하면 이 작업을 자동화할 수 있습니다.

VBA 코드 사용 방법

1. Visual Basic for Applications(VBA)

VBA는 마이크로소프트 오피스 패키지(Word, Excel, PowerPoint 등)에서 사용되는 매크로 프로그래밍 언어입니다. VBA를 사용하면 매크로를 작성하여 워드 문서에 자동화 작업을 수행할 수 있습니다.

2. 워드 문서에서 특정 단어 빈도수 세기

아래의 VBA 코드를 사용하여 워드 문서에서 특정 단어의 빈도수를 자동으로 세어보겠습니다.

Sub CountWordFrequency()
    Dim Word As String
    Dim Count As Integer

    ' 세어볼 단어 입력
    Word = InputBox("빈도수를 세어볼 단어를 입력하세요.")

    ' 문서 내 단어 카운트
    With ActiveDocument.Content.Find
        .ClearFormatting
        .Text = Word
        .Execute Forward:=True, Wrap:=wdFindStop
        Do While .Found
            Count = Count + 1
            .Execute Forward:=True, Wrap:=wdFindStop
        Loop
    End With

    ' 결과 출력
    MsgBox Word & "의 빈도수는 " & Count & "입니다."
End Sub

위의 코드를 다음과 같이 따라 해보세요.

  1. 워드 문서를 엽니다.
  2. ALT + F11 키로 VBA 편집기를 엽니다.
  3. 새로운 모듈을 추가하고, 위의 코드를 붙여넣습니다.
  4. 실행하고 싶은 부분에서 코드를 선택하고 F5를 눌러 실행합니다.
  5. 빈도수를 세고자 하는 단어를 입력하고 확인을 누릅니다.
  6. 결과가 나타납니다.

결론

VBA를 사용하여 워드 문서에서 특정 단어의 빈도수를 세는 작업을 자동화할 수 있습니다. 이를 통해 많은 시간과 노력을 절약할 수 있으며, 효율적인 데이터 분석과 문서 작업을 가능하게 합니다. VBA는 사용법을 익히는 데 시간이 걸릴 수 있으나, 익숙해지면 다양한 작업을 자동화할 수 있는 강력한 도구가 될 것입니다.