That message box should only come up with Balance wasn't found:

But this line will execute whether or not it was found:

..Range("H" & Rows.Count).End(xlUp).Copy Dest.Offset(, 4)



Kel wrote:

Thanks. It works well, one small issue though...the message box is
coming up even though it is populating the new sheet correctly. Why is
the box coming up if it is finding the value?

--

Dave Peterson