워드 문서에서 특정 단어 빈도수 세기를 자동화하는 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
위의 코드를 다음과 같이 따라 해보세요.
- 워드 문서를 엽니다.
- ALT + F11 키로 VBA 편집기를 엽니다.
- 새로운 모듈을 추가하고, 위의 코드를 붙여넣습니다.
- 실행하고 싶은 부분에서 코드를 선택하고 F5를 눌러 실행합니다.
- 빈도수를 세고자 하는 단어를 입력하고 확인을 누릅니다.
- 결과가 나타납니다.
결론
VBA를 사용하여 워드 문서에서 특정 단어의 빈도수를 세는 작업을 자동화할 수 있습니다. 이를 통해 많은 시간과 노력을 절약할 수 있으며, 효율적인 데이터 분석과 문서 작업을 가능하게 합니다. VBA는 사용법을 익히는 데 시간이 걸릴 수 있으나, 익숙해지면 다양한 작업을 자동화할 수 있는 강력한 도구가 될 것입니다.
'■ 칼퇴를 위한 VBA : 사례 > - VBA for 워드' 카테고리의 다른 글
헤더 및 푸터 자동화를 위한 워드 VBA 코드 (0) | 2023.07.04 |
---|---|
워드 VBA 코드를 사용한 문서 저장 자동화 (0) | 2023.07.04 |
VBA 코드를 활용한 워드 문서 보호 설정 자동화 (0) | 2023.07.04 |
워드 문서 내 특정 텍스트 찾기 및 바꾸기를 자동화하는 VBA 코드 (0) | 2023.07.04 |
워드 VBA 코드를 사용한 목차 자동 생성 (0) | 2023.07.04 |