Excel VBA使用.Find和.FindNext查找精确字符串

时间:2015-08-13 21:28:01

标签: excel vba

我在使用.Find和.FindNext时遇到了麻烦。我想搜索字符串" Q1"究竟。目前,当我的.FindNext函数运行时,它会找到" Q1"在一个拥有" Q10"作为它的价值。如何限制.Find和/或.FindNext函数以搜索我想要的确切字符串? 谢谢您的帮助!

这是我的代码。例如,我想找到" Q1"的第三个实例。在一系列单元中可能有Q1,Q3,Q5,Q10,Q11,Q1,Q2,Q1等。

Dim findValue As Range

' find first instance of Q1
searchString = "Q1" 
Set findValue = ActiveWorkbook.Sheets("Sheet1").Cells.Find(What:=searchString)
findValue.select

' set loopMax to 2 because we want to .Findnext to run two more times to arrive at the third instance of "Q1" 
For counter = 1 To loopMax
Set findValue = ActiveWorkbook.Sheets("Sheet1").Cells.FindNext(findValue)
findValue.select
Next counter  

我被困住了。任何帮助将不胜感激!

1 个答案:

答案 0 :(得分:0)

需要在对Find()

的调用中添加lookat:=xlWhole