<div>
I'd do something like this<br />
<br />

<pre><code id="code-20-39962383-1">on error resume next

set rgFound=Range(Cells(y, &quot;A&quot;), Cells(y, x - 1)).Find(what:=Cells(y, x).Value)) 

if err&lt;&gt;0 then
msgbox &quot;error happened&quot;
 err.clear
else
msgbox &quot;all is well&quot;
end if

on error goto 0</code></pre>
</div>


I'd do something like this



on error resume next

set rgFound=Range(Cells(y, "A"), Cells(y, x - 1)).Find(what:=Cells(y, x).Value)) 

if err<>0 then
msgbox "error happened"
 err.clear
else
msgbox "all is well"
end if

on error goto 0

<div>
Hi,<br />
<br />
where is the goto ini statement?
</div>


<div>
Hi, <br />
<br />
not working, enters in a infinite loop. Any other idea?<br />
<br />
there is a loop running, i need to verify in the cells before the cells(y,x) before to enter the number, ensuring the number doesn't repeat
</div>


Hi,

not working, enters in a infinite loop. Any other idea?

there is a loop running, i need to verify in the cells before the cells(y,x) before to enter the number, ensuring the number doesn't repeat

<div>
the perfect solution!!!!! Thanks!!!!
</div>


<div>
<div class="content wysiwyg-content">
I have the following code<br />
<br />
If IsError(Range(Cells(y, &quot;A&quot;), Cells(y, x - 1)).Find(what:=Cells(y, x).Value)) Then<br />
<br />
Else<br />
GoTo INI<br />
End If<br />
<br />
I want to identify when range.find not found nothing, but always &nbsp;go to the else :goto INI, any idea?
</div>
</div>


I have the following code

If IsError(Range(Cells(y, "A"), Cells(y, x - 1)).Find(what:=Cells(y, x).Value)) Then

Else
GoTo INI
End If

I want to identify when range.find not found nothing, but always  go to the else :goto INI, any idea?

find method vba

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.