word vba selection.find.found

"Selection.Find.Found" 是在 Word VBA 中使用的一个属性，用于判断上一次使用 "Find" 方法后是否成功找到匹配的内容。

具体来说，当我们在 VBA 代码中使用 "Selection.Find.Execute" 方法进行文本查找时，如果成功找到了匹配的内容，"Found" 属性就会返回 "True"，否则返回 "False"。

例如，以下代码演示了如何使用 "Selection.Find.Found" 属性来判断上一次查找是否成功：

Sub FindAndReplace()
    ' 将 "hello" 替换为 "world"
    With Selection.Find
        .Text = "hello"
        .Replacement.Text = "world"
        .Execute Replace:=wdReplaceAll
    End With
    ' 判断是否成功替换
    If Selection.Find.Found Then
        MsgBox "替换成功！"
        MsgBox "未找到匹配内容。"
    End If
End Sub
在上述代码中，我们首先使用 "Selection.Find.Execute" 方法查找并替换文本，然后使用 "Selection.Find.Found" 属性来判断是否成功替换。如果 "Found" 属性返回 "True"，就会弹出一个消息框显示 "替换成功！"，否则会弹出一个消息框显示 "未找到匹配内容。"。
希望这个回答对您有帮助。