Word는 작성하는 동안 도움이 될 수있는 다양한 정보를 상태 표시 줄에 표시합니다. 예를 들어 상태 표시 줄에는 문서의 페이지 수와 현재 페이지의 줄 번호가 표시됩니다. 도움이되는 한 가지는 입력 할 때 상태 표시 줄에 문서의 단어 수가 표시되는 것입니다.

그러나 이러한 기능은 Word에 내장되어 있지 않습니다. 상태 표시 줄은 전체 표시 줄을 표시하거나 숨기거나 메시지를 쓰는 것 외에는 매크로를 통해 재구성 할 수 없습니다. 계속해서 상태 표시 줄에 메시지를 기록하는 매크로를 코딩하면 정상적인 정보가 표시되지 않으므로 상태 표시 줄을 사용하는 솔루션은 허용되지 않을 수 있습니다.

문서의 단어 수를 지속적으로 확인하는 매크로를 작성한 다음 제목 표시 줄이나 도구 모음 단추와 같은 문서의 다른 영역에 결과를 표시 할 수 있습니다. 보유한 시스템 유형에 따라 이러한 솔루션이 허용되지 않을 수 있습니다. 확인하려면 몇 가지 테스트를 수행해야합니다. 문서의 단어 수를 계산하는 내부 코드는 특히 문서가 커질수록 다소 느립니다. 즉, 단어 수를 지속적으로 확인하면 전체 시스템이 허용되지 않을 정도로 느려질 수 있습니다.

이주의 사항을 염두에두고 다음 매크로 집합을 고려하십시오.

Sub AutoExec()

NumberOfWords End Sub

Sub NumberOfWords()

Dim lngWords As Long     Dim myRange As Range     With Word.Application         If .Windows.Count > 0 Then             Set myRange = ActiveDocument.Content             lngWords = myRange.ReadabilityStatistics(1).Value             .Caption = Format(lngWords, "##,##0") & " words - Microsoft Word"

Else             .Caption = "Microsoft Word"

End If         .OnTime Now + TimeValue(OnTm(lngWords)), "NumberOfWords"

End With End Sub

Private Function OnTm(ByVal lngWd As Long) As String     Select Case lngWd \ 1000         Case 0 To 10             OnTm = "00:00:01"

Case 11 To 20             OnTm = "00:00:05"

Case 21 To 30             OnTm = "00:00:10"

Case 31 To 40             OnTm = "00:00:15"

Case Else             OnTm = "00:00:20"

End Select End Function

이 세트에는 각각 다른 작업을 수행하는 세 개의 매크로가 포함되어 있습니다. AutoExec이라는 첫 번째 매크로는 Word가 시작될 때마다 자동으로 실행됩니다. 유일한 목적은 다음 매크로 인 NumberOfWords를 처음으로 호출하는 것입니다.

NumberOfWords 매크로는이 세트의 핵심입니다. Word에 열려있는 창이 있는지 확인합니다. 그렇다면 Word의 내부 코딩을 호출하여 문서의 단어 수를 결정합니다. 그런 다음 출력 형식을 지정하고 창의 제목 표시 줄에 표시합니다.

열려있는 창이 없으면 매크로는 제목 표시 줄에 “Microsoft Word”만 표시합니다.

NumberOfWords가하는 마지막 일은 언제 다시 실행해야하는지 스스로에게 알려주는 것입니다. VBA의 OnTime 기능을 사용하여 다시 시작 시간을 다음 20 초 이내로 설정합니다. 여기에서 세 번째 매크로 인 OnTm이 작동합니다. 현재 문서의 단어 수를 살펴보고 NumberOfWords 매크로 실행 간격을 결정합니다. 문서에 10,000 개 이하의 단어가있는 경우 매크로는 매초마다 실행됩니다. 11,000에서 20,000 개의 단어가있는 경우 5 초마다 실행됩니다.

이 검사의 이유는이 팁의 앞부분에서 다뤘습니다. 단어 수 계산과 제목 표시 줄 정보의 서식 지정에는 시간이 걸릴 수 있으며 (VBA 용어로) 문서가 크면 원치 않는 눈에 띄는 지연이 발생할 수 있습니다. 문서를 업데이트 할 때. 원하는 경우 OnTm 함수에서 코딩을 사용하여 사용하는 문서 유형에 대한 최상의 지연 분석을 결정할 수 있습니다.

_ 참고 : _

이 페이지 (또는 WordTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / wordribbon-WordTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

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

(Microsoft Word는 세계에서 가장 인기있는 워드 프로세싱 소프트웨어입니다.)이 팁 (1608)은 Microsoft Word 97, 2000, 2002 및 2003에 적용됩니다.