Steven은 항상 문서에서 변경 내용 추적을 사용합니다. 그는 문서에서 변경된 단어 (변경 내용 추적의 영향을받는 단어) 만 계산하는 방법이 필요합니다.

대답은 검토 창을 사용하여 원하는 정보를 얻을 수 있다는 것입니다. 리본의 검토 탭을 표시 한 다음 추적 그룹에서 검토 창 도구를 클릭합니다. Word는 화면에 검토 창을 표시하고 창 맨 위에는 문서 수정 내용 요약이 표시됩니다. 다음 다섯 가지 변경 사항에 대한 통계를 보여줍니다.

삽입 삭제 이동 서식 변경 * 주석

이 통계는 법안에 맞는 것처럼 보이지만 내가 원하는 정보를 “일종의”제공한다고 말한 것을 기억할 것입니다. 당신이 정말로 원하는 것이 변경된 단어의 수이면 그것들은 약간 부족합니다. 통계 개수는 변경된 단어가 아니라 변경됩니다. 예를 들어 여러 단어로 구성된 구문을 삭제하면 해당 편집은 통계에서 단 한 번의 삭제로 간주됩니다. 마찬가지로 문서에 구문을 추가하면 삽입에 완전한 단락이 포함되어 있더라도 해당 추가는 단일 삽입으로 계산됩니다.

실제 단어를 변경하려는 경우 불행히도 운이 좋지 않습니다. Word는 원하는 정보를 얻을 수있는 방법을 제공하지 않습니다. 그러나 원하는 정보를 결정하기 위해 고유 한 매크로를 고안 할 수 있습니다. 다음은 예입니다.

Sub GetTCStats()

Dim lInsertsWords As Long     Dim lInsertsChar As Long     Dim lDeletesWords As Long     Dim lDeletesChar As Long     Dim sTemp As String     Dim oRevision As Revision          lInsertsWords = 0     lInsertsChar = 0     lDeletesWords = 0     lDeletesChar = 0     For Each oRevision In ActiveDocument.Revisions         Select Case oRevision.Type             Case wdRevisionInsert                 lInsertsChar = lInsertsChar + Len(oRevision.Range.Text)

lInsertsWords = lInsertsWords + oRevision.Range.Words.Count             Case wdRevisionDelete                 lDeletesChar = lDeletesChar + Len(oRevision.Range.Text)

lDeletesWords = lDeletesWords + oRevision.Range.Words.Count         End Select     Next oRevision

sTemp = "Insertions" & vbCrLf     sTemp = sTemp & "    Words: " & lInsertsWords & vbCrLf     sTemp = sTemp & "    Characters: " & lInsertsChar & vbCrLf     sTemp = sTemp & "Deletions" & vbCrLf     sTemp = sTemp & "    Words: " & lDeletesWords & vbCrLf     sTemp = sTemp & "    Characters: " & lDeletesChar & vbCrLf     MsgBox sTemp End Sub

이 매크로는 현재 문서의 각 변경 사항을 단계별로 수행하고 삽입 및 삭제 모두에 대한 단어 수와 문자 수를 개별적으로 합산합니다. 그러면 통계가 메시지 상자에 표시됩니다. 매크로는 문서의 각 변경 사항에 대해 Words 컬렉션을 확인합니다.

여기에 제시된 단어 수는 근사치라는 것을 이해해야합니다. 이것은 단어가 계산되는 방식 때문입니다. 예를 들어 덧셈의 각 문장 부호는 별도의 단어로 계산됩니다. 즉, “볼 수 있듯이 이것은 좋은 방법입니다”와 같은 구문은 9 개가 아닌 10 개 단어로 집계됩니다 (쉼표는 별도의 단어로 간주 됨). 또한 추가 한 구문에 삽입시 자주 사용되는 선행 공백이 포함 된 경우 해당 공백으로 인해 11 개의 단어가 삽입 될 수 있습니다.

_ 참고 : _

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

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

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

(Microsoft Word는 세계에서 가장 널리 사용되는 워드 프로세싱 소프트웨어입니다.)이 팁 (11484)은 Microsoft Word 2007, 2010, 2013, 2016, 2019 및 Office 365의 Word에 적용됩니다.이 팁의 버전은 다음과 같습니다. Word의 이전 메뉴 인터페이스 :

link : / word-Counting_Changed_Words [Counting Changed Words].