利用“宏”打造Word高级字数统计功能.docVIP

Word本身提供了强大的字数统计功能。以Word XP为例，选择菜单“工具”→“字数统计”，Word会显示出页数、字数、段落数、行数等信息，足以满足大多数用户的需要。尽管如此，有时候还是不免出现鞭长莫及的情形。 一、单个词语的出现次数有一次一位朋友问我：Word能不能统计出特定关键词（例如某个人的姓名）的出现次数？我只能告诉他Word本身不直接支持这方面的文档分析功能。但是，我们可以另辟蹊径，用“查找/替换”功能得到某个词语的出现次数。步骤如下： 按Ctrl+H显示出“查找和替换”对话框的“替换”页。 在“查找内容”栏，输入要统计其出现次数的词语。 在“替换为”栏，输入“^”，表示要替换的内容就是查找的内容。这样，执行替换操作后文档的内容实际上不会改变。 点击“全部替换”按钮。 Word执行替换，然后显示出有多少个词语被替换，如图一。这个数字就是该词语在文档中出现的次数。 图一 如果只是偶尔要了解一二个词语的出现次数，上面的办法足以应付。但是，如果经常要进行这类统计，最好用一个Word宏简化操作。下面的Word宏FindWords()首先提示用户要统计的单词，然后显示出该单词在文档中出现的次数；只要用户不点击“取消”按钮（或在不输入单词的情况下点击“确定”按钮），它将一直重复这个过程。 Sub FindWords()Dim sResponse As Stri