Patrick. Thank you for your reply. I am assuming that the Match function
changes the data in the cells of column B?
If that is the case, then I really want to keep the data in Sheet1 and
Sheet2 unchanged. I just want to copy over relevant data from Sheet1 into
Sheet3.

Please correct me if I am mistaken.

Thanks!

nshring

"Patrick Molloy" wrote:

this is really simple if you use a MATCH function in sheet2 column B
=IF(ISERROR(MATCH(A1,Sheet1!A:A,FALSE)),0,MATCH(A1 ,Sheet1!A:A,FALSE))

now your code just reads down the results

set target to range("B1")
rowindex = 0
do while target<""
if target,Value0 then
rowindex = rowindex +1
worksheets("Sheet1").rows(target.value).copy
worksheets("Sheet3").rows(worksheets("Sheet1")).Pa stepecial xlall
end if
set target = target.offset(1)
loop

"nshring" wrote:

Hello,
I have a scenario in which there is one excel 2007 workbook with three
sheets in it.
Sheet 1 is a master sheet with around 1900 rows and 15 columns of data.
Sheet 2 contains the qualifying data.
Sheet 3 is a result (or an output) sheet.

Sheet 2 has a column A with unique 5 digit integers.
The goal is to compare every cell of column A of Sheet 2 with Column B in
Sheet 1.
If there is a match, then copy that whole row of Sheet 1 into Sheet 3.
Repeat until all the cells in Column A of Sheet 2 have been compared with
Column B of Sheet 1.

What is the best way to achieve this?

Thanks much!