sub remove_junk
dim c1 as rangedim c2 as range
for each c1 in sheet1.range(A:A) for each c2 in sheet2.range(A:A) if c1.value = c2.value then goto found end if nextc1.deletefound:next
end sub
You could use something like this