创建宏时,您需要执行的最常见的操作之一是针对文件中每次出现的内容重复执行一系列操作。这听起来可能很奇怪,但是编程人员对此情况非常了解-您需要搜索文件,然后采取一些措施,重复搜索并重复该操作,依此类推,直到到达文件末尾。通用方法如下:

Selection.HomeKey Unit:=wdStory [set up for your search]

Selection.Find.Execute While Selection.Find.Found     [take some action]

Selection.Find.Execute Wend

本示例中的第一行移至文档的开头。

然后,您可以使用设置搜索所需的任何命令。当遇到Selection.Find.Execute行时,Word将执行实际搜索。然后,使用Selection.Find.Found来控制While …​ Wend循环。每次执行的搜索实际导致发现某项内容时,将此属性(Selection.Find.Found)设置为True。因此,只要继续找到要搜索的内容,就会反复重复整个While …​ Wend循环。作为循环的最后一步,Selection.Find.Execute语句用于再次执行搜索。

注意:

如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)中描述的宏,我准备了一个包含有用信息的特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(1083)适用于Microsoft Word 97、2000、2002和2003。您可以为Word(Word 2007)的功能区界面找到此技巧的版本。和更高版本)在这里: