代表查找操作的执行条件。
Find 对象的属性和方法对应于" 查找和替换"对话框中的选项。
使用 Find 属性返回 Find 对象。下例查找并选择出现的下一个"hi"单词。
With Selection.Find .ClearFormatting .Text = "hi" .Execute Forward:=TrueEnd With
以下示例在活动文档中查找所有"hi"并将其替换为"hello"。
Set myRange = ActiveDocument.ContentmyRange.Find.Execute FindText:="hi", ReplaceWith:="hello", _ Replace:=wdReplaceAll
注解
如果你已从 Selection 对象中获得 Find 对象,当发现文本与下一个查找条件匹配时,所选内容会更改。下例选择出现的下一个"blue"单词。
Selection.Find.Execute FindText:="blue", Forward:=True
如果你已从 Range 对象中获得 Find 对象,当发现文本与下一个查找条件匹配时,所选内容不会更改,但将重新定义 Range 对象。下例在活动文档中查找出现的第一个"blue"单词。如果在文档中找到"blue",则将重新定义 myRange ,"blue"将应用粗体格式。
Set myRange = ActiveDocument.ContentmyRange.Find.Execute FindText:="blue", Forward:=TrueIf myRange.Find.Found = True Then myRange.Bold = True
名称 |
---|
ClearAllFuzzyOptions |
ClearFormatting |
ClearHitHighlight |
Execute |
Execute2007 |
HitHighlight |
SetAllFuzzyOptions |
联系客服