search error

[Jphill]

I need to have a message that comes up when there is no match within the search command. Right now the macro stops running and goes to debug. I want it to say part doesn't exist try again. Any suggestions?

 

[Jim North]

<pre>

' find the meter in column C
With Range("C:C")
Set C = .Find(MName, LookIn:=xlValues)
If Not C Is Nothing Then
firstAddress = C.Address
Do
Loop While Not C Is Nothing And C.Address <> firstAddress
End If
End With

' display an error message if the meter is not found
If C Is Nothing Then
MsgBox ("the meter number " & MName & " was not found")
Else ' display the meter requested
' move the window to the line with the meter on it
Range("G" & C.Row).Value = MCF
End If


</pre>