运行指定的查找操作。 如果查找成功,则返回 True Boolean

表达式 执行 ( FindText MatchCase MatchWholeWord MatchWildcards MatchSoundsLike MatchAllWordForms Forward Wrap Format ReplaceWith Replace MatchKashida MatchDiacritics MatchAlefHamza MatchControl )

expression 是必需的。 一个代表 Find 对象的变量。

必需/可选 Variant ,则返回 true ,则查找操作定位查找文字的所有形式 (例如,"sit"查找"坐",而"坐")。 对应于 查找和替换 对话框中的 查找单词的各种形式 复选框。 Forward Variant 要向前搜索 (向文档的末尾)。 Variant 如果从非文档起点处开始搜索并到达文档末尾(如 Forward 设置为 False 则相反),则用该参数控制接下来的操作。 当存在选定内容或区域,而又没有在该选定内容或区域中找到搜索文字时,也可用该参数控制接下来的操作。 可取值为 WdFindWrap 常量之一。 Format Variant 如果该属性值为 True ,则查找操作定位于格式或带格式的文本,而不是查找文本。 ReplaceWith Variant 替换文字。 要删除由 Find 参数指定的文字,可使用空字符串 ("")。 与 Find 参数相似,该参数也可以指定特殊的字符和高级搜索条件。 要将图形对象或者其他非文本项指定为替换内容,可将这些项置于剪贴板上,然后将 ReplaceWith 指定为"^c"。 Replace Variant 指定执行替换的个数:一个、全部或者无。 可以是任何 WdReplace 常量。 MatchKashida Variant 如此 如果查找操作用 kashida 阿拉伯语语言的文档中匹配的文本。 此参数可能不可用,这取决于您所选择或安装的语言支持 (例如美国英语)。 MatchDiacritics Variant 如此 如果查找操作用匹配从右到左语言的文档中的音调符号来匹配文字。 此参数可能不可用,这取决于您所选择或安装的语言支持 (例如美国英语)。 MatchAlefHamza Variant 如此 如果查找操作用匹配 alef hamza 适用于阿拉伯语语言的文档中匹配的文本。 此参数可能不可用,这取决于您所选择或安装的语言支持 (例如美国英语)。 MatchControl Variant 如此 如果查找操作用匹配的从右到左语言的文档中的双向控制字符来匹配文字。 该常量可能不可用,这取决于所选择或安装的语言支持(例如,美国英语)。 MatchPrefix Variant 才能匹配以搜索字符串开头的单词。 对应于 查找和替换 对话框中的 区分前缀 复选框。 MatchSuffix Variant 才能匹配以搜索字符串结尾的单词。 对应于 查找和替换 对话框中的 区分后缀 复选框。 MatchPhrase Variant 如果该属性值为 True ,则忽略单词之间的所有空格和控制字符。 IgnoreSpace Variant 会忽略单词之间的所有空格。 对应于 查找和替换 对话框中的 忽略空格 复选框。 IgnorePunct Variant True ,则忽略单词之间的所有标点符号。 对应于“查找和替换” 对话框中的“忽略标点符号” 复选框。

如果 MatchWildcards True ,可以为 FindText 参数指定通配符和其他高级搜索条件。 例如,“*(ing)”查找任何以“ing”结尾的单词。

要搜索符号字符,可键入脱字符号 (^)、零 (0),然后键入符号字符的代码。 例如,“^0151”对应一条长划线 (—)。

除非另外指定,否则替换文本将沿用文档中被替换文本的格式。 例如,如果用“xyz”替换字符串“abc”,那么加粗“abc”将被加粗字符串“xyz”所替换。

另外,如果 MatchCase False ,那么,无论替换文本是大写还是小写,查找到的大写文本都将被大写的替换文本替换。 例如,上例中,“ABC”将被“XYZ”替换。

本示例查找并选择下一个“library”。

With Selection.Find 
    .ClearFormatting 
    .MatchWholeWord = True 
    .MatchCase = False 
    .Execute FindText:="library" 
End With

本示例在活动文档中查找所有的“hi”,并且将其替换为“hello”。

Set myRange = ActiveDocument.Content 
myRange.Find.Execute FindText:="hi", _ 
    ReplaceWith:="hello", Replace:=wdReplaceAll

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。