第55~56讲-find 方法与findNext方法-优快云博客

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,而是返回区域的开头进行循环查找。
·为了避免查到重复的