Find.Found 属性 (Word)
如此 如果生成搜索匹配项。 只读 Boolean。
expression。 Found
表达 一个代表“Find”对象的变量。
在查找选定内容之前,清除查找条件中的格式。 如果查找到的单词"Hello"为加粗格式,则选定整个段落,并将其复制至剪贴板上。
With Selection.Find
.ClearFormatting
.Font.Bold = True
.Execute FindText:="Hello", Format:=True, Forward:=True
If .Found = True Then
.Parent.Expand Unit:=wdParagraph
.Parent.Copy
End If
End With
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。