문서에 대한 문법 검사를 수행 할 때 Word에서 수행하는 마지막 단계는 콘텐츠 표시를 분석하는 데 사용할 수있는 가독성 통계 집합을 표시하는 것입니다. 전체 문법 검사를 먼저 거치지 않고 가독성 통계 만 표시하려는 경우가있을 수 있습니다. 불행히도 Word는이 작업을 수행하는 방법을 제공하지 않습니다. 그러나 가독성 통계를 매우 멋지게 표시하는 매크로를 만들 수 있습니다. 이러한 매크로의 핵심은 ReadabilityStatistics 컬렉션입니다.

이러한 매크로를 작성하는 방법을 알아 보려면 다음 단일 행 매크로를 고려하십시오.

Sub CheckTest()

MsgBox ActiveDocument.Content.ReadabilityStatistics(9).Value End Sub

이 매크로는 ReadabilityStatistics 컬렉션의 아홉 번째 멤버 인 Flesch Reading Ease 값을 나타내는 숫자를 표시합니다. 컬렉션에는 다음과 같이 10 개의 개별 요소가 있습니다.

Index

Meaning

1

Words

2

Characters

3

Paragraphs

4

Sentences

5

Sentences per Paragraph

6

Words per Sentence

7

Characters per Word

8

Passive Sentences

9

Flesch Reading Ease

10

Flesch-Kincaid Grade Level

10 개의 통계를 모두 표시하려면 (문서의 완전한 문법 검사에서 수행되는 것처럼) 매크로가 컬렉션의 다양한 구성원을 통과하여 해당 값을 표시하도록하는 것뿐입니다.

다음 매크로는이를 수행합니다.

Sub Readability()

Dim DocStats As String     Dim MBTitle As String     Dim J As Integer

MBTitle = "Readability Statistics"

DocStats = ""

With ActiveDocument.Content         For J = 1 to 10             DocStats = DocStats & .ReadabilityStatistics(J)

DocStats = DocStats & ": "

DocStats = DocStats & .ReadabilityStatistics(J).Value             DocStats = DocStats & vbCrLf         Next J     End With     MsgBox DocStats, vbOKOnly, MBTitle End Sub

매크로를 실행할 때 실행하는 데 약간의 시간이 걸립니다.

실제로 시스템 속도, 문서 길이 및 복잡성에 따라 실행하는 데 상당한 시간이 걸릴 수 있습니다. 인내심을 가지십시오. 10 개의 통계가 완료되면 화면에 표시됩니다.

_ 참고 : _

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

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

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

(Microsoft Word는 세계에서 가장 널리 사용되는 워드 프로세싱 소프트웨어입니다.)이 팁 (1784)은 Microsoft Word 97, 2000, 2002 및 2003에 적용됩니다. Word의 리본 인터페이스에 대한이 팁 버전 (Word 2007)을 찾을 수 있습니다. 이후) 여기 :

link : / wordribbon-Only_Showing_Readability_Statistics [Only Showing Readability Statistics].