Need VB Routine To Search Top to Bottom Without Restarting at Top

geshorse,

in your last row of code

Please Login or Register  to view this content.

maybe you could use this instead

Please Login or Register  to view this content.

This way if the cell has nothing in it it will just stop?
I am not sure if it will work with your data but it's worth a shot.


Simeon

Thanks for the reply but this locks up excel where going to task manager and closing excell is required to exit. I have tried variations but with no success.

Thanks but this gives me the same results. It copies information to the secondary sheet for each line that is found but then repeats the find over and over again. If there is a command that tells the cell.find to start at top and stop searching when there is no more data witout repeating then that would work. OR If in my "If" statement I could compare the line on the data page that is found to the first line copied to the Lib Search page then Exit Sub could occur when they match.

Something like:
If ActiveCell.Value = Sheets("Lib Search").ActiveCell Then Exit Sub Else GoTo SearchLoop

Sorry for the late reply. Away for the holidays then catching up.

I tried your routine but it did not find the data. I changed it around a bit but still no luck but... If my following question can be done then I believe it will work.

If a cell has been set to active ie. "Set cCell = ActiveCell"... Let's say it is cell E3 but could be many others... how do you make active the first cell of that Row? In this example E1.