☰

计算 Microsoft Word 中每个句子的单词数

tag-icon • tag-icon microsoft-word
计算 Microsoft Word 中每个句子的单词数

在 Microsoft Word 中，我希望能够找出每个句子有多少个单词；特别是如果任何句子有超过 20 个单词。

有没有办法在 MS Word 中查看这样的统计数据？我知道有可读性统计数据，但它没有提供我想要的信息。

答案1

这个简短的宏将循环遍历每个句子，如果有 20 个单词或更多，则会以绿色突出显示，以便您可以轻松识别它们并进行查看。

Sub test()

Dim i As Integer
Dim j As Integer

i = ActiveDocument.Sentences.Count

For j = 1 To i

    If ActiveDocument.Sentences(j).Words.Count >= 20 Then ActiveDocument.Sentences(j).HighlightColorIndex = wdBrightGreen

Next

End Sub

相关内容