Excel 在VBA抓取中查找部分文本1部分不正确的记录

我有一段代码，它在列中的每个（hope so）单元格中找到一个特定值，但它只抓取一条记录并结束代码。桌子是这样的

Q10至Q20（“FD-葡萄”，FD-南瓜，FD-菠萝，FD-苹果）

然后我使用了这个代码，它只显示菠萝而不显示苹果

Dim f As Range
For each f In Range("Q10:Q20").Find(what:="apple", lookat:=xlPart)
If f Is Nothing Then
MsgBox ""
Else
f = "apples"
End If
Next f

它只检测到不正确的菠萝，我想抓取苹果，但“FD”不是常数。在我找到苹果后，我想把它改成苹果。查找（…）只执行一次，因为你要求它查找范围内的东西，而不是要查找的东西（在每个单元格中查找）.我建议使用仪表：

Dim f As Range
For Each f In Range("Q10:Q20")
If InStr(1, f.Value, "apple") = 0 Then
MsgBox ""
Else
f.Value = "apples"
End If
Next f

---

指定匹配参数@me how-您能更具体一点吗先生。Thankstype

Range（“A1”）。查找（

然后看看intelli-sense语法。这需要一些时间，你必须找到精确匹配的语法。

看看：=xlWhole

也许吧？@Patrick你可能想看看我现在的评论，在那里你将了解如何使用。查找有效。感谢Alex爵士的提示。它有效。我还找到了一种通过放置“.”来区分苹果和菠萝的方法介于两者之间。谢谢你的帮助。