请教如何在word内进行多个关键词查找并统计

gabrielxoli · 发表于 2017-12-6 16:23

请教下，如何实现在word中同时查找出多个关键词的数量。
比方说同时查找出里面人民日报参考消息等关键词的数量。

感谢哈！

duquancai · 发表于 2017-12-6 21:25

循环用一个变量计数

duquancai · 发表于 2017-12-6 22:31

本帖最后由 duquancai 于 2017-12-7 01:29 编辑

Sub test()
详见7楼附件》》》》》》》》》》》》》》》
End Sub

413191246se · 发表于 2017-12-6 22:49

楼主好！杜先生辛苦了！——为什么把 MsgBox 放在循环中，而不是放在循环外？是不是杜先生回答得匆忙了一些？（另外：Taol 这个变量挺好笑的，我还是喜欢单字母变量，呵呵……）

413191246se · 发表于 2017-12-6 22:55

另外像 Do While .Execute 这种写法我很喜欢，但是迄今为止还没写出来过一次。前一阵子，跟杜先生学会了比如 .Collapse 0 和 .expand 4 和 .execute"",,,1,,,,,,"",2 等这些简写方法，非常喜欢，谢谢杜先生！

duquancai · 发表于 2017-12-6 23:05

本帖最后由 duquancai 于 2017-12-6 23:07 编辑

413191246se 发表于 2017-12-6 22:49
楼主好！杜先生辛苦了！——为什么把 MsgBox 放在循环中，而不是放在循环外？是不是杜先生回答得匆忙了 ...

因为他的要求是：统计每一个关键词在文档中出现的次数！！！我只是写了 2个关键词的列子而已！

413191246se · 发表于 2017-12-6 23:34

原来如此！这样循环下来，回车打得够多的，我不喜欢打太多回车。另外，数组，我只有一级简单地会一点，还是和 loquat 学的，以前几乎不会，函数到现在还不会。谢谢杜先生！千万要注意休息！

duquancai · 发表于 2017-12-7 01:28

本帖最后由 duquancai 于 2017-12-7 01:30 编辑

用的SQL+ADO写的代码
附件，打开Word文档，点击按钮》》》》》》》》》》》》》》》》》》》》》

gabrielxoli · 发表于 2017-12-7 10:05

非常感谢啊！我继续学习应用下哈！

yz1976 · 发表于 2020-4-17 23:44

duquancai 发表于 2017-12-7 01:28
用的SQL+ADO写的代码
附件，打开Word文档，点击按钮》》》》》》》》》》》》》》》》》》》》》

您好，我很需要您这个代码，可否交流一下

		自动登录	找回密码
密码			免费注册

[求助] 请教如何在word内进行多个关键词查找并统计