필드의 장점 중 하나는 문서 내에 동적 정보를 삽입 할 수 있다는 것입니다. 필드가 업데이트되면 사용중인 필드와 관련된 최신 정보로 대체됩니다. 예를 들어, NumWords 필드를 사용하여 문서에 단어 수를 삽입 할 수 있습니다. 필드가 업데이트되면 문서에있는 많은 단어로 대체됩니다.

섹션의 단어 수를 알아 내고 문서에 동적으로 배치하려면 운이 좋지 않습니다. 이 정보를 반환 할 필드가 없습니다. 섹션에서 텍스트를 선택한 다음 단어 개수 도구를 선택하여 수동으로 찾을 수 있지만 문서에 삽입하고 자동으로 업데이트 할 수있는 값을 가지려는 욕구를 충족 시키지는 않습니다.

즉, 원하는 단어 수를 얻으려면 매크로에 의존해야합니다. 문서의 각 섹션에있는 단어 수만 알고 싶다면 다음 매크로가 도움이 될 수 있습니다.

Sub WordCount()

Dim NumSec As Integer     Dim S As Integer     Dim Summary As String

NumSec = ActiveDocument.Sections.Count     Summary = "Word Count" & vbCrLf

For S = 1 To NumSec         Summary = Summary & "Section " & S & ": " _           & ActiveDocument.Sections(S).Range.Words.Count _           & vbCrLf     Next

Summary = Summary & "Document: " & _       ActiveDocument.Range.Words.Count     MsgBox Summary End Sub

이것은 단순히 각 섹션을 단계별로 진행하고 해당 섹션의 단어 수를 결정하고 메시지 상자에 요약 정보를 표시합니다.

이것은 문서에 정보를 동적으로 삽입하는 방법을 제공하지 않지만 단일 섹션의 단어 수를 찾는 방법에 대한 설명을 제공합니다.

이 기술의 변형을 통해 문서 내의 책갈피 위치에 특정 섹션의 단어 수를 자동으로 삽입 할 수 있습니다. 정의한 “WordCount”라는 북마크가 있다고 가정 해 보겠습니다. 이 책갈피는 문서의 두 번째 섹션에서 단어 수를 원하는 위치를 지정합니다. 다음 매크로는 지정된 섹션의 단어 수를 결정한 다음 책갈피 위치에 텍스트를 삽입합니다.

Sub InsertWordCount()

Dim oRange As Word.Range     Dim sBookmarkName As String     Dim sTemp As String

sBookmarkName = "WordCount"

With ActiveDocument         sTemp = Format(.Sections(2).Range.Words.Count, "0")

Set oRange = .Bookmarks(sBookmarkName).Range         oRange.Delete         oRange.InsertAfter Text:=sTemp         .Bookmarks.Add Name:=sBookmarkName, Range:=oRange     End With End Sub

매크로는 문서를 열거 나 저장하거나 인쇄 할 때 실행되는 매크로와 같은 다른 매크로에서 쉽게 호출 할 수 있습니다. 이렇게하면 필드가 자동으로 업데이트 될 때 항상 단어 수가 업데이트됩니다.

_WordTips_는 비용 효율적인 Microsoft Word 교육을위한 소스입니다.

(Microsoft Word는 세계에서 가장 널리 사용되는 워드 프로세싱 소프트웨어입니다.)이 팁 (11098)은 Microsoft Word 2007 및 2010에 적용됩니다. 여기에서 Word의 이전 메뉴 인터페이스에 대한이 팁 버전을 찾을 수 있습니다.link : / word -Word_Count_for_a_Section [섹션의 단어 수].