Find string and offset copy

Hi hi,

I am writing a macro to do many things but one task is to find the zip code on a sheet written zip in column a and the actual 5 digit code in column b. Then copy the # and paste it on another sheet in a specific cell.

Unfortunately the below code does not work. What is wrong with my find statement?

Thanks,
~RUTH~

Please Login or Register  to view this content.

Try this:

Please Login or Register  to view this content.

Thanks for both your responses! VBA noob your simple 1 liner worked perfectly. I always record my macros and excel uses so many steps. It is nice to see real programing. Thanks again!

~RUTH~

What if instead of the value to be the same you wanted it to ref the other cell like =A1 not the value of A1.

~RUTH~

Try this, untested:

Please Login or Register  to view this content.

No that didn't do it. Instead it gave me an =$B$8 as text and also that ref that sheet not the sheet it came from. So even if it wasn't text the formula is wrong.

~RUTH~