vba - 如何使用 VBA 遍历 MS Word 2010 文档中的单词列表？

Question

我实际上想要做的是实现一个按钮来计算Gunning 雾指数。除了 VBA，我通常会做的是：

1. 提供一个被认为是“复杂”的单词词典（根据专业术语编译，仅在必要时使用）
2. 获取文档中的单词列表。
3. 确定此列表的长度。
4. 获取句子的数量（可能只是“点空白”出现的数量）并确定平均单词/句子
5. 过滤“复杂”单词的单词列表，并将“复杂单词列表”的长度与“单词列表”的长度进行比较。

我不知道如何获取对象“this documents.wordList”，以及“长度”和“过滤器是复杂的”方法是什么。

这不需要特别优雅，仅供个人使用。

Answer 1

该.Find方法与每次找到一个单词时自身加 1 的计数器相结合，可以提供文档中复杂单词的列表。长度只是搜索结束时的计数器。

该Words.Count属性将返回文档中所有单词的数量。同样，您可以Sentences.Count为句子的数量做。

这应该让你指向正确的方向。访问Word VBA 帮助文件以获取有关此功能和其他可能性的更多信息。