1 ·单元格区域的find方法:
Find方法在区域内查找某值的第一个单元格,注意返回找到的单元格对象
Find方法只且永远返回该区域第一个匹配的对象
·查找下一个需要使用FindNext或者FindPreous方法
2 查找就会有两个结果的可能,找到或者找不到
·如果找到自然会返回找到的单元格对象
·如果没有找到,则是该对象的初始状态Nothing什么都不是,
注意:不能使用=来判断是否Nothing-要用对象判断的特定符号is 来判断。
·请注意Nothing不是False 判断时应该使用not对象is nothing来判断单元格存在与否,而不是ls not Nothing.
’Nothing 不是一个固定态,它不等于任何的某一个值,不是精确匹配的概念不能使用=匹配
'对象 is Nothing 返回 True or False
'如果对象是Nothing is Nothing ===> True
'如果对象不是Nothing Not is Nothing ===>Ture
'典型的错误 is Not Nothing
Sub find方法()
Dim rng As Range
Set rng = Range("a1").CurrentRegion.Find("王新刚")
If Not rng Is Nothing Then
MsgBox rng.Address(0, 0)
Else
MsgBox "没有找到该单元格"
End If
End Sub
3 FindNext 的用法
FindNext方法必须在find方法之后使用才有实际意义,FindNext(after:=单元格对象),代表从某一个单元格对象之后开始查找,查找条件是在Find方法中设定的查找的值。
FindNext的循环查找特性,就是当找到区域中的最后一个符合条件的单元格对象之后继续执行FindNext不会返回Nothing,而是返回区域的开头进行循环查找。
·为了避免查到重复的